ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ ПО ИНФОРМАТИКЕ(Двухмерный массив). Заполнить массив следующим образом: 12 24 ... 120 ... ... ... ... 2 14 ... 110 1 13 ... 109
ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ ПО ИНФОРМАТИКЕ(Двухмерный массив). Заполнить массив следующим образом:
12 24 ... 120
... ... ... ...
2 14 ... 110
1 13 ... 109
Ответ(ы) на вопрос:
Гость
const
n = 10;
m = 12;
var
a: array[1..m, 1..n] of integer;
i, j: integer;
begin
for i := 1 to m do
begin
for j := 1 to n do
begin
a[i, j] := 12 * j - (i - 1);
write(a[i, j]:3, ' ');
end;
writeln;
end;
end.
Не нашли ответ?
Похожие вопросы