Напишите программу в паскале , которая вводит двумерный массив целых чисел 5 на 10 элементов случайным образом и выводит его на экран

Предыдущий
вопрос Следующий
вопрос

program TwoDimensionalArray;

const
ROWS = 5;
COLS = 10;

var
arr: array[1..ROWS, 1..COLS] of Integer;
i, j: Integer;

begin
Randomize;

// Fill the array with random numbers
for i := 1 to ROWS do
begin
for j := 1 to COLS do
begin
arr[i, j] := Random(100);
end;
end;

// Display the array
for i := 1 to ROWS do
begin
for j := 1 to COLS do
begin
Write(arr[i, j]:5);
end;
Writeln;
end;

end.