Загадка на ней птах сидає вона його гойдає какая отгадка?

мумми троль и его друзья

--- Python 3.8.3 ---

def MatrixPrint(Matr):

   matrixstring = ''

   rows = len(Matr)

   cols = len(Matr[0])

   for row in range(rows):

       for col in range(cols):

           matrixstring += str(Matr[row][col]) + ' '

       matrixstring += '\n'

   print(matrixstring)

def main():

   n = int(input())

   Matr = [[int(i) for i in input().split(maxsplit=n)] for i in range(n)]

   for i in range(n):

           Matr[i][i], Matr[i][n-i-1] = Matr[i][n-i-1], Matr[i][i]

   MatrixPrint(Matr)

   

if __name__ == "__main__":

   main()

Объяснение:

Var a:array[1..50] of byte;

n,p, i,k,m,j,x,y,z: integer;

begin

writeln('Введите количество элементов');

readln(p);

repeat;  - обратите внимание, что Вы написали repead, хотя нужно repeat.

n:=4;

for i:=n downto 1 do begin

a[i]:=p mod 10;

p:= p div 10;

end;

For i:=1 To n-1 Do Begin

k := i;

For j := i + 1 To n Do

If a[j] >= a[k] Then

k := j;

m := a[i];

a[i] := a[k];

a[k] := m;

end;

x:=a[1]*1000+a[2]*100+a[3]*10+a[4];

For i := 1 To N - 1 Do Begin

k := i;

For j := i + 1 To n Do

If a[j] <= a[k] Then

k := j;

m := a[i];

a[i] := a[k];

a[k] := m;

end;

y:=a[1]*1000+a[2]*100+a[3]*10+a[4];

z:=x-y;

until z=p;

writeln(z);

end.