Заполнить двухмерный массив в паскале числами от 1 до 15. i=3, j-5

Question

Информатика

Василиск

10 июня, 01:08

Заполнить двухмерный массив в паскале числами от 1 до 15. i=3, j-5

+1

Ответы (1)

Знаете ответ?

Венуся · Answer 1

Uses crt;

const n=3;

m=5;

var a:array[1 ... n, 1 ... m] of integer;

i, j:integer;

begin

randomize;

for i:=1 to n do

for j:=1 to m do

begin

a[i, j]:=random (15) ;

write (a[i, j]:3) ;

end;

end.