How to write correctly? ... with the function Code:

const n=10; m=15; type mas=array [1..n,1..m] of integer; var i:integer; function min (var a:mas;n,m:integer):integer; var i,j:integer; begin randomize; for i:=1 to n do for j:=1 to m do a[i,j]:=random(50)-10; min:=a; end; var a:mas; i,j:integer; begin writeln('massiv'); min(a); for i:=1 to n do begin for j:=1 to m do begin write(a[i,j]); end; writeln; end; end.
  • one
    Is this a game - ask and answer yourself? - Crasher
  • the answer seems to differ only in the string with random - Vladyslav Matviienko

1 answer 1

 const n=10; m=15; type mas=array [1..n,1..m] of integer; var a:mas; i:integer; function min (var aa:mas):mas; var i,j:integer; begin randomize; for i:=1 to n do for j:=1 to m do aa[i,j]:=random(5)-10; min:=aa; end; var j:integer; begin writeln('massiv'); min(a); for i:=1 to n do begin for j:=1 to m do begin write(a[i,j]:2); end; writeln; end; end.