Инициализация матрицы натуральными числами по спирали

07.06.2016, 13:00. Показов 492. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Дана квадратная матрица, сторона которой нечетное число
Требуется заполнить эту матрицу натуральными числами
по спирали начиная с угла матрицы и кончая ее центром.
Эта программа использует рекурсивную процедуру. Ибо
начальная матрица представляет собой как бы вложенные
друг в друга квадратные матрицы. И рекурсия завершается
заполнением центрального элемента.

(Программа проверена)

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
DECLARE SUB iniM (a!(), n!, m!)
CLS
n = 3
DIM a(-n TO n, -n TO n)
 
CALL iniM(a(), n, 1)
 
FOR i = -n TO n
FOR j = -n TO n
   PRINT USING "  ##"; a(i, j);
NEXT j: PRINT
NEXT i
END
 
SUB iniM (a(), n, m)
   IF n = 0 THEN
      a(0, 0) = m
   ELSE
      FOR j = -n TO n - 1
         a(-n, j) = m: m = m + 1
      NEXT j
 
      FOR i = -n TO n - 1
         a(i, n) = m: m = m + 1
      NEXT i
 
      FOR j = n TO -(n - 1) STEP -1
         a(n, j) = m: m = m + 1
      NEXT j
 
      FOR i = n TO -(n - 1) STEP -1
         a(i, -n) = m: m = m + 1
      NEXT i
 
      CALL iniM(a(), n - 1, m)
   END IF
END SUB

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

07.06.2016, 13:00

Ответы с готовыми решениями:

Заполнить квадратную матрицу натуральными числами по спирали
составить программу,которая заполняет квадратную матрицу порядка n нутуральными числами 1,2,3,...n,записывая их в нее "по...

Заполните матрицу натуральными числами по спирали и змейкой
Заполните матрицу, содержащую N строк и M столбцов, натуральными числами по спирали и змейкой, то есть типо этого: 1 2 3 4 5 6...

Заполнить квадратную матрицу натуральными числами по спирали
Составить программу, которая заполняет квадратную матрицу порядка n натуральными числами 1, 2, 3, …, n2, записывая их в нее «по спирали»...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

07.06.2016, 13:00

Помогаю со студенческими работами здесь

Заполнить массив последовательными натуральными числами, идущими по спирали
привет всем не могу написать программу, помогите пожалуйста можно просто алгоритм с соответствующими операциями Дан квадратный...

Разработайте программу, которая заполняет двумерный массив натуральными числами по спирали
Помогите с заданием по лабораторной работе пожалуйста. Разработайте программу, которая заполняет двумерный массив натуральными числами...

Улитка.Матрицу M (m,n) заполнить натуральными числами от 1 до m*n по спирали, начинающей в левом верх
Помогите пожалуйста решить задачу по BORLAND С++ Улитка.Матрицу M (m,n) заполнить натуральными числами от 1 до m*n по спирали, начинающей...

Заполнить матрицу натуральными числами от 1 до MxN по спирали, начинающейся в левом верхнем углу и закрученной по часовой стрелке
Помогите написать программки в фортране: Спираль. Матрицу М (m строк, n столбцов) заполнить натуральными числами от 1 до mxn (x -...

Заполнить двумерный массив указанного размера последовательными натуральными числами, двигаясь от верхнего левого элемента вправо и далее по спирали
Заполнить двумерный массив указанного размера последовательными натуральными числами, двигаясь от верхнего левого элемента вправо и далее...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем

Наверх