program uzd3; const n=2; m=10; k=100; var mas:array[1..n,1..m] of integer; i,j:integer; begin randomize; for i:=1 to n do for j:=1 to m do mas[i,j]:=randkom(k);