Question

Напишите строку кода, пропущенную в описанном цикле для заполнения элементов описанной квадратной матрицы, находящихся на её главной диагонали, единицами

a: array [1..10, 1..10] of 0..1;
for i:=1 to 10 do

Answer 1

Ответ:

var a: array [1..10, 1..10] of integer;

i,j: integer;

begin

for i:=1 to 10 do

for j:=1 to 10 do

if i=j then a[i,j]:=1

end.