В Паскале АBC (можно net) написать две программы ,чтобы в одной из них был магический...

Question

В Паскале АBC (можно net) написать две программы ,чтобы в одной из них был магический квадрат со стороной 4,а во второй со стороной 6

Comments

1) Квадрат должен генерироваться случайным образом?

---

2) Нужно использовать графику, или можно матрицу вывести?

---

надо только матрицу вывести

---

Квадрат должен генерироваться "на лету", или можно просто несколько вариантов матриц запомнить?

---

можно один вариант матрицы

---

Ну тогда просто объявите константный массив и выведите на экран... 15 строк - максимум))

---

у меня не получается,я для этого и задал вопрос

Answer 1

// PascalABC.NET 3.2, сборка 1436 от 01.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=new integer[4,4] ((1,15,14,4),(12,6,7,9),(8,10,11,5),(13,3,2,16));
  a.Println(3);
  var b:=new integer[6,6] ((6,32,3,34,35,1),(7,11,27,28,8,30),
    (19,14,16,15,23,24),(18,20,22,21,17,13),(25,29,10,9,26,12),
    (36,5,33,4,2,31));
  Writeln;
  b.Println(3);
end.

Результат:
  1 15 14  4
 12  6  7  9
  8 10 11  5
 13  3  2 16

  6 32  3 34 35  1
  7 11 27 28  8 30
 19 14 16 15 23 24
 18 20 22 21 17 13
 25 29 10  9 26 12
 36  5 33  4  2 31

Comments

можете сделать черз массив?