Учеба и наука

Turbo Pascal - вопрос №529221

Помогите решить задачу Паскаль! Даны целые числа от 1 до 64. Получить матрицу 8-го порядка, элементами которой являются данные числа, расположенные по 8 в каждой.

январь 22, 2013 г.

Сообщить о нарушении

Всего ответов: 1

Антон Евгеньевич Городов

16-й в

1 отзыв

program matrix;
var
m:array [1..8,1..8] of integer;
i,j:integer;
begin
for j:=1 to 8 do
begin
for i:=1 to 8 do
begin
m[i][j]:=i+8*(j-1);
write(m[i][j]:3);
end;
writeln;
end;
end.