Паскаль. Заполнить двухмерный массив по образцу. мой 4 вариант

Question

Паскаль. Заполнить двухмерный массив по образцу. мой 4 вариант

---

Answer 1

Const n=12;m=10;
var a: array [1..n,1..n] of integer;
 i,j:integer;
begin
for i:=1 to n do begin
  for j:=1 to m do begin
    a[i,j]:=12*j-i+1;
    write(a[i,j]:4);
    end;
  writeln;
  end;
end.

Comments

Тут хватает Beginov

---

????