По разделам

 

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


Дана квадратная матрица A порядка M (M — нечетное число). Начиная с элемента A1,1 и перемещаясь против часовой стрелки, вывести все ее элементы по спирали: первый столбец, последняя строка, последний столбец в обратном порядке, первая строка в обратном порядке, оставшиеся элементы второго столбца и т.д.; последним выводится центральный элемент матрицы.

Код (C/C++)

#include <bits/stdc++.h>

using namespace std;

int main()
{
    system("chcp 1251");
    srand(time(0));
    int n;
    cin >> n;
    vector <vector < int > > ar(n , vector < int > (n));
    for (size_t i = 0;i < ar.size();++i)
        for (size_t j = 0;j < ar.size();++j)
            ar[i][j] = rand() % 90 + 10;
    for (auto i : ar){
        for (auto j : i)
            cout << j << " ";
        cout << endl;
    }
    cout << endl;
    for (int i = 0;i < ar.size() / 2 + 1;++i)
    {
    for (size_t j = i;j < ar.size() - i;++j)
        cout << ar[j][i] << " ";
    for (size_t j = i + 1;j < ar.size() - i;++j)
        cout << ar[ar.size() - 1 - i][j] << " ";
    for (size_t j = ar.size() - 2 - i;(int)j >= i;--j)
        cout << ar[j][ar.size() - 1 - i] << " ";
    for (size_t j = ar.size() - 2 - i;j > i;--j)
        cout << ar[i][j] << " ";
    }
    return 0;
}

Код (Python)

import random
import numpy

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

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

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

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

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

    i +=2

print(a)


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

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

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

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

    i +=2
									

Код (Pascal)

program Matrix16;
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 div 2 do
   begin
    For j:=i2 to M-i2+1 do Write(a[j,i2],' ');
    For i:=i2+1 to M-i2+1 do Write(a[M-i2+1,i],' ');
    For j:=M-i2 downto i2 do Write(a[j,M-i2+1],' ');
    For i:=M-i2 downto i2+1 do Write(a[i2,i],' ');
    writeln('');
   end;
  writeln(a[M div 2+1,M div 2+1]);
end.
									




Matrix. Абрамян
Matrix 1 Просмотров: 101
Matrix 2 Просмотров: 83
Matrix 3 Просмотров: 67
Matrix 4 Просмотров: 65
Matrix 5 Просмотров: 81
Matrix 6 Просмотров: 73
Matrix 7 Просмотров: 71
Matrix 8 Просмотров: 58
Matrix 9 Просмотров: 72
Matrix 10 Просмотров: 77
Matrix 11 Просмотров: 64
Matrix 12 Просмотров: 83
Matrix 13 Просмотров: 85
Matrix 14 Просмотров: 56
Matrix 15 Просмотров: 101
Matrix 16 Просмотров: 85
Matrix 17 Просмотров: 88
Matrix 18 Просмотров: 48
Matrix 19 Просмотров: 72
Matrix 20 Просмотров: 79
Matrix 21 Просмотров: 50
Matrix 22 Просмотров: 44
Matrix 23 Просмотров: 62
Matrix 24 Просмотров: 68
Matrix 25 Просмотров: 73
Matrix 26 Просмотров: 80
Matrix 27 Просмотров: 52
Matrix 28 Просмотров: 55
Matrix 29 Просмотров: 58
Matrix 30 Просмотров: 56
Matrix 31 Просмотров: 50
Matrix 32 Просмотров: 61
Matrix 33 Просмотров: 64
Matrix 34 Просмотров: 76
Matrix 35 Просмотров: 47
Matrix 36 Просмотров: 84
Matrix 37 Просмотров: 72
Matrix 38 Просмотров: 71
Matrix 39 Просмотров: 46
Matrix 40 Просмотров: 48
Matrix 41 Просмотров: 65
Matrix 42 Просмотров: 58
Matrix 43 Просмотров: 63
Matrix 44 Просмотров: 64
Matrix 45 Просмотров: 47
Matrix 46 Просмотров: 44
Matrix 47 Просмотров: 70
Matrix 48 Просмотров: 47
Matrix 49 Просмотров: 49
Matrix 50 Просмотров: 66
Matrix 51 Просмотров: 55
Matrix 52 Просмотров: 46
Matrix 53 Просмотров: 55
Matrix 54 Просмотров: 75
Matrix 55 Просмотров: 49
Matrix 56 Просмотров: 55
Matrix 57 Просмотров: 50
Matrix 58 Просмотров: 54
Matrix 59 Просмотров: 58
Matrix 60 Просмотров: 55
Matrix 61 Просмотров: 61
Matrix 62 Просмотров: 72
Matrix 63 Просмотров: 65
Matrix 64 Просмотров: 76
Matrix 65 Просмотров: 69
Matrix 66 Просмотров: 73
Matrix 67 Просмотров: 67
Matrix 68 Просмотров: 67
Matrix 69 Просмотров: 63
Matrix 70 Просмотров: 51
Matrix 71 Просмотров: 46
Matrix 72 Просмотров: 48
Matrix 73 Просмотров: 48
Matrix 74 Просмотров: 81
Matrix 75 Просмотров: 64
Matrix 76 Просмотров: 62
Matrix 77 Просмотров: 57
Matrix 78 Просмотров: 58
Matrix 79 Просмотров: 69
Matrix 80 Просмотров: 58
Matrix 81 Просмотров: 55
Matrix 82 Просмотров: 40
Matrix 83 Просмотров: 57
Matrix 84 Просмотров: 64
Matrix 85 Просмотров: 53
Matrix 86 Просмотров: 44
Matrix 87 Просмотров: 58
Matrix 88 Просмотров: 55
Matrix 89 Просмотров: 46
Matrix 90 Просмотров: 53
Matrix 91 Просмотров: 49
Matrix 92 Просмотров: 61
Matrix 93 Просмотров: 55
Matrix 94 Просмотров: 65
Matrix 95 Просмотров: 55
Matrix 96 Просмотров: 59
Matrix 97 Просмотров: 59
Matrix 98 Просмотров: 45
Matrix 99 Просмотров: 57
Matrix 100 Просмотров: 52

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться