Попробовал создать массив, вроде бы все правильно но при запуске выдается Program2.$pascal_array1
Вот код
Вот код
| Код |
|---|
Const n=5; m=4; var a:array[1..n, 1..m] of integer; i,j:integer; begin for i:=1 to n do for j:=1 to m do a[i,j]:=random(50); write (a[i]); end. |