Информатика, опубликовано 2018-08-22 23:58:47 by Гость
Заполнить массив двухмерный по образцу 12 24 ... 120 ... ... ... ... 2 14 ... 110 1 13 ... 109
Ответ оставил Гость
Const n=12;m=10;
var a: array [1..n,1..n] of integer;
i,j:integer;
begin
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=12*j-i+1;
write(a[i,j]:4);
end;
writeln;
end;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.