Display a two-dimensional array A [2,5] in a tabular form fill the array with random numbers from [30.60]

program zz1;
var a: array [1..2,1..5] of integer; // set up an array with two rows and five columns
i, j: integer;
begin
for i: = 1 to 2 do
for j: = 1 to 5 do
a [i, j]: = random (31) +30; // fill the array with random numbers from 30 to 60

for i: = 1 to 2 do
begin
for j: = 1 to 5 do
write (a [i, j]: 4); // display the array on the screen
writeln; // transition to a new line
end;
end.