CРОЧНО РЕШИТЬ НА ПАСКАЛЕ !!!!!123456 234561 345612 456123 561234 612345 решить

что значит "решить матрицу"?

сформировать матрицу и составить программку

а что эта программа обязана делать?

(123456234561345612456123561234612345) вот эти числа, являются ответами программки, то есть вывод программки. А что она делает, обязано быть схоже, как на волшебный квадрат, но не совершенно.

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программка не работает, обновите версию!

begin

 var a := ArrGen(6, t -gt; t + 1);

 var b := new integer[6, 6];

 for var i := 0 to 5 do

 begin

   b.SetRow(i, a);

   a := a[1:] + a[:1] // повторяющийся сдвиг на лево на 1 позицию

 end;

 b.Println(2)

end.

Program SyrnayaBulka;  

var i,j,k:integer;

   s:string;

begin

s:='**** -=Alphaeus=- ****';

for i:=1 to 22 do begin write(s[i]); sleep(67) end;

writeln;writeln;

 for i:=1 to 6 do

   begin

     write('     ');

     for j:=1 to 6 do

       begin

         k:=i+j-1;

         if kgt;6 then k:=k-6;

         write(k,' ');

       end;  

     writeln;

   end;

end.