Решение задачи Matrix 13

#include <bits/stdc++.h>

using namespace std;

int main()
{
    int m, n;
    cin >> m >> n;
    int a[m][n];
    for(int i = 0; i < m; ++i){
        for(int j = 0; j < n; ++j)
            cin >> a[i][j];
    }
    for(int i = 0;  i < m; ++i){

        for(int j = 0; j < n - i; ++j)
            cout << a[i][j] << ' ';
        for(int j = i + 1; j < m; ++j)
            cout << a[j][n - 1 - i] << ' ';
    }
    return 0;
}

import random
import numpy

#M = random.randrange(2,10)
M = 7
print("M = ",M)
a = numpy.zeros((M, M))
#a.astype(int)

k = 0
for i in range(M):
    for j in range(M-i):
        k += 1
        a[i][j] = k
    k += M-i-1

k = M+1
for j in range(1,M):
    for i in range(j,M):
        a[i][M-j] = k
        k += 1
    k += M-j

print(a)

for i in range(M):
    for j in range(M-i):
        print(a[i][j], end=" ")
    for j in range(i+1,M):
        print(a[j][M-i-1], end=" ")
									

program Matrix13;
 
var
  a:array [1..10,1..10] of integer;
  M, i, j, i2:Integer;
 
begin
 
 Write('M: ');
 Readln(M);
 
 for  i:=1 to M do
  begin
   writeln(i,': ');
   for j:=1 to M do
    begin
     Write(j,' : ');
     Read(a[i,j]);
    end;
  end;
 
  for i2:=1 to M do
   begin
    for i:=1 to M-i2+1 do write (' ',a[i2,i]);
    for j:=i2+1 to M do write (' ',a[j,M-i2+1]);
    writeln('');
   end;
end.