pascal. код в описании
Объяснение:
program massiv5x6;
var a: array[0..4, 0..5] of integer;
i, j: integer;
begin
for i := 0 to 4 do
for j := 0 to 5 do
a[i, j] := round(random(61) - 40);
Write(a[i, j]:4);
end;
WriteLn;
end.
pascal. код в описании
Объяснение:
program massiv5x6;
var a: array[0..4, 0..5] of integer;
i, j: integer;
begin
for i := 0 to 4 do
begin
for j := 0 to 5 do
begin
a[i, j] := round(random(61) - 40);
Write(a[i, j]:4);
end;
WriteLn;
end;
end.