По разделам

 

Решение задачи 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 Просмотров: 164
Matrix 2 Просмотров: 122
Matrix 3 Просмотров: 92
Matrix 4 Просмотров: 82
Matrix 5 Просмотров: 116
Matrix 6 Просмотров: 95
Matrix 7 Просмотров: 97
Matrix 8 Просмотров: 87
Matrix 9 Просмотров: 91
Matrix 10 Просмотров: 113
Matrix 11 Просмотров: 92
Matrix 12 Просмотров: 117
Matrix 13 Просмотров: 123
Matrix 14 Просмотров: 77
Matrix 15 Просмотров: 139
Matrix 16 Просмотров: 112
Matrix 17 Просмотров: 131
Matrix 18 Просмотров: 80
Matrix 19 Просмотров: 119
Matrix 20 Просмотров: 170
Matrix 21 Просмотров: 73
Matrix 22 Просмотров: 74
Matrix 23 Просмотров: 87
Matrix 24 Просмотров: 97
Matrix 25 Просмотров: 108
Matrix 26 Просмотров: 110
Matrix 27 Просмотров: 94
Matrix 28 Просмотров: 76
Matrix 29 Просмотров: 78
Matrix 30 Просмотров: 92
Matrix 31 Просмотров: 73
Matrix 32 Просмотров: 81
Matrix 33 Просмотров: 83
Matrix 34 Просмотров: 117
Matrix 35 Просмотров: 70
Matrix 36 Просмотров: 106
Matrix 37 Просмотров: 92
Matrix 38 Просмотров: 96
Matrix 39 Просмотров: 71
Matrix 40 Просмотров: 68
Matrix 41 Просмотров: 99
Matrix 42 Просмотров: 81
Matrix 43 Просмотров: 75
Matrix 44 Просмотров: 88
Matrix 45 Просмотров: 66
Matrix 46 Просмотров: 65
Matrix 47 Просмотров: 92
Matrix 48 Просмотров: 69
Matrix 49 Просмотров: 80
Matrix 50 Просмотров: 87
Matrix 51 Просмотров: 70
Matrix 52 Просмотров: 69
Matrix 53 Просмотров: 80
Matrix 54 Просмотров: 104
Matrix 55 Просмотров: 66
Matrix 56 Просмотров: 75
Matrix 57 Просмотров: 71
Matrix 58 Просмотров: 66
Matrix 59 Просмотров: 76
Matrix 60 Просмотров: 73
Matrix 61 Просмотров: 89
Matrix 62 Просмотров: 101
Matrix 63 Просмотров: 83
Matrix 64 Просмотров: 107
Matrix 65 Просмотров: 96
Matrix 66 Просмотров: 94
Matrix 67 Просмотров: 89
Matrix 68 Просмотров: 89
Matrix 69 Просмотров: 80
Matrix 70 Просмотров: 62
Matrix 71 Просмотров: 61
Matrix 72 Просмотров: 61
Matrix 73 Просмотров: 66
Matrix 74 Просмотров: 101
Matrix 75 Просмотров: 85
Matrix 76 Просмотров: 78
Matrix 77 Просмотров: 78
Matrix 78 Просмотров: 81
Matrix 79 Просмотров: 94
Matrix 80 Просмотров: 83
Matrix 81 Просмотров: 73
Matrix 82 Просмотров: 51
Matrix 83 Просмотров: 99
Matrix 84 Просмотров: 80
Matrix 85 Просмотров: 70
Matrix 86 Просмотров: 57
Matrix 87 Просмотров: 82
Matrix 88 Просмотров: 65
Matrix 89 Просмотров: 60
Matrix 90 Просмотров: 65
Matrix 91 Просмотров: 56
Matrix 92 Просмотров: 75
Matrix 93 Просмотров: 69
Matrix 94 Просмотров: 77
Matrix 95 Просмотров: 72
Matrix 96 Просмотров: 77
Matrix 97 Просмотров: 67
Matrix 98 Просмотров: 54
Matrix 99 Просмотров: 73
Matrix 100 Просмотров: 74

Комментарии

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