Задача 45.
Создание матрицы 5x4, вывод ее на экран по строкам
program Massiv_2;
const
N = 5; { Число строк }
M = 4; { Число столбцов }
var
Table : array [1..N, 1..М] of integer; { Заказываем область памяти для хранения двумерного массива из N строк и М столбцов }
{ Вообще говоря, нигде не определено, что первый индекс - это номер строки, а второй - это номер столбца. Так как выводом на экран занимается программист, он сам решает, как ему удобнее.
Нам удобнее считать, что номер строки - первый индекс, а номер столбца - второй }
i, j : integer; { Переменные для хранения индексов строки и столбца }
begin
{ Заполнение массива датчиком случайных чисел;}
randomize;
for i:=1 to N do
for j:=l to M do
Table[i, j]:=Random(100); { Запись случайного числа в массив на место с номером строки i и номером столбца j }
{ Вывод матрицы на экран по строкам; }
for i:=1 to N do
begin
for j:=1 to M do
write(Table[i, j]);
writeln { Переход на новую строку после вывода всех элементов строки i }
end;
readln
end.
|