По разделам

 

Решение задачи 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 Просмотров: 456
Matrix 2 Просмотров: 247
Matrix 3 Просмотров: 201
Matrix 4 Просмотров: 192
Matrix 5 Просмотров: 207
Matrix 6 Просмотров: 227
Matrix 7 Просмотров: 200
Matrix 8 Просмотров: 229
Matrix 9 Просмотров: 242
Matrix 10 Просмотров: 224
Matrix 11 Просмотров: 208
Matrix 12 Просмотров: 247
Matrix 13 Просмотров: 216
Matrix 14 Просмотров: 199
Matrix 15 Просмотров: 269
Matrix 16 Просмотров: 191
Matrix 17 Просмотров: 240
Matrix 18 Просмотров: 160
Matrix 19 Просмотров: 212
Matrix 20 Просмотров: 264
Matrix 21 Просмотров: 165
Matrix 22 Просмотров: 133
Matrix 23 Просмотров: 226
Matrix 24 Просмотров: 161
Matrix 25 Просмотров: 157
Matrix 26 Просмотров: 174
Matrix 27 Просмотров: 146
Matrix 28 Просмотров: 135
Matrix 29 Просмотров: 124
Matrix 30 Просмотров: 135
Matrix 31 Просмотров: 128
Matrix 32 Просмотров: 132
Matrix 33 Просмотров: 137
Matrix 34 Просмотров: 161
Matrix 35 Просмотров: 144
Matrix 36 Просмотров: 200
Matrix 37 Просмотров: 138
Matrix 38 Просмотров: 152
Matrix 39 Просмотров: 114
Matrix 40 Просмотров: 152
Matrix 41 Просмотров: 154
Matrix 42 Просмотров: 137
Matrix 43 Просмотров: 122
Matrix 44 Просмотров: 125
Matrix 45 Просмотров: 122
Matrix 46 Просмотров: 137
Matrix 47 Просмотров: 137
Matrix 48 Просмотров: 125
Matrix 49 Просмотров: 128
Matrix 50 Просмотров: 122
Matrix 51 Просмотров: 122
Matrix 52 Просмотров: 128
Matrix 53 Просмотров: 128
Matrix 54 Просмотров: 154
Matrix 55 Просмотров: 95
Matrix 56 Просмотров: 134
Matrix 57 Просмотров: 107
Matrix 58 Просмотров: 112
Matrix 59 Просмотров: 108
Matrix 60 Просмотров: 130
Matrix 61 Просмотров: 134
Matrix 62 Просмотров: 142
Matrix 63 Просмотров: 111
Matrix 64 Просмотров: 155
Matrix 65 Просмотров: 124
Matrix 66 Просмотров: 153
Matrix 67 Просмотров: 135
Matrix 68 Просмотров: 112
Matrix 69 Просмотров: 138
Matrix 70 Просмотров: 87
Matrix 71 Просмотров: 96
Matrix 72 Просмотров: 98
Matrix 73 Просмотров: 98
Matrix 74 Просмотров: 131
Matrix 75 Просмотров: 132
Matrix 76 Просмотров: 102
Matrix 77 Просмотров: 119
Matrix 78 Просмотров: 123
Matrix 79 Просмотров: 123
Matrix 80 Просмотров: 166
Matrix 81 Просмотров: 117
Matrix 82 Просмотров: 102
Matrix 83 Просмотров: 144
Matrix 84 Просмотров: 104
Matrix 85 Просмотров: 99
Matrix 86 Просмотров: 84
Matrix 87 Просмотров: 117
Matrix 88 Просмотров: 103
Matrix 89 Просмотров: 96
Matrix 90 Просмотров: 91
Matrix 91 Просмотров: 88
Matrix 92 Просмотров: 105
Matrix 93 Просмотров: 118
Matrix 94 Просмотров: 109
Matrix 95 Просмотров: 103
Matrix 96 Просмотров: 106
Matrix 97 Просмотров: 96
Matrix 98 Просмотров: 88
Matrix 99 Просмотров: 113
Matrix 100 Просмотров: 114

Комментарии

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