Прямоугольную матрицу заполнить последовательными чётными натуральными числами "по спирали" .

@RendomID · Регистрация: 10.01.2014

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

а) составить блок-схему алгоритма решения;
б) написать реализующую алгоритм программу на языке Pascal

Данную прямоугольную матрицу размера nxm заполнить последовательными чётными натуральными числами "по спирали" (направление по часовой стрелке). Сформированную матрицу (для проверки) вывести на экран. (Числа n и m не должны превышать 20 и задаются пользователем).

@ZX Spectrum-128 · 20.04.2017, 15:02

Изначально: (С) RSLoader

Pascal
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
38
39
40
41
42
43
44
45
46
47
var
  a: array[1..100, 1..100] of integer;
  i, imax, imin, j, jmax, jmin, k, m, n: integer;
 
begin
  write('Vvedite 4islo strok: ');
  readln(m);
  write('Vvedite 4islo stolbcov: ');
  readln(n);
  jmin := 1;
  jmax := n;
  imin := 2;
  imax := m;
  k := 0;
  repeat
    for j := jmin to jmax do
    begin
      inc(k, 2);
      a[imin - 1, j] := k;
    end;
    for i := imin to imax do
    begin
      inc(k, 2);
      a[i, jmax] := k;
    end;
    dec(jmax);
    for j := jmax downto jmin do
    begin
      inc(k, 2);
      a[imax, j] := k;
    end;
    dec(imax);
    for i := imax downto imin do
    begin
      inc(k, 2);
      a[i, jmin] := k;
    end;
    inc(imin);
    inc(jmin);
  until k >= m * n * 2;
  for i := 1 to m do
  begin
    writeln;
    for j := 1 to n do 
      write(a[i, j]:5);
  end;
end.

@Puporev · 20.04.2017, 15:30

Заполнить квадратную матрицу четными числами по сходящейся к центру линии (по спирали)

Новые блоги и статьи Все статьи Все блоги /
JWT аутентификация в ASP.NET Core UnmanagedCoder 18.06.2025 Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .	Краткий курс по С# aaLeXAA 18.06.2025 Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .	50 самых полезных примеров кода Python для частых задач py-thonny 17.06.2025 Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .	C# и продвинутые приемы работы с БД stackOverflow 17.06.2025 Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .	Angular: Вопросы и ответы на собеседовании Reangularity 15.06.2025 Готовишься к техническому интервью по Angular? Я собрал самые распространенные вопросы, с которыми сталкиваются разработчики на собеседованиях в этом году. От базовых концепций до продвинутых. . .
Архитектура Onion в ASP.NET Core MVC stackOverflow 15.06.2025 Что такое эта "луковая" архитектура? Термин предложил Джеффри Палермо (Jeffrey Palermo) в 2008 году, и с тех пор подход только набирал обороты. Суть проста - представьте себе лук с его. . .	Unity 4D GameUnited 13.06.2025 Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .	SSE (Server-Sent Events) в ASP.NET Core и .NET 10 UnmanagedCoder 13.06.2025 Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .	С днём независимости России! Hrethgir 13.06.2025 Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .	Лето вокруг. kumehtar 13.06.2025 Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .

@RendomID 4 / 4 / 0 Регистрация: 10.01.2014 Сообщений: 94

	Прямоугольную матрицу заполнить последовательными чётными натуральными числами "по спирали" . 20.04.2017, 14:38. Показов 1966. Ответов 2 Метки нет (Все метки) а) составить блок-схему алгоритма решения; б) написать реализующую алгоритм программу на языке Pascal Данную прямоугольную матрицу размера nxm заполнить последовательными чётными натуральными числами "по спирали" (направление по часовой стрелке). Сформированную матрицу (для проверки) вывести на экран. (Числа n и m не должны превышать 20 и задаются пользователем). 0

@Puporev Почетный модератор 64312 / 47609 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	20.04.2017, 15:30
	Сообщение было отмечено ZX Spectrum-128 как решение Решение Заполнить квадратную матрицу четными числами по сходящейся к центру линии (по спирали) 0

Опции темы

Прямоугольную матрицу заполнить последовательными чётными натуральными числами "по спирали" .

Решение