Квадратная матрица и простые числа

15.12.2016, 16:10. Показов 409. Ответов 0

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

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

Дана матрица размером 19×19. Требуется заполнить
ее по спирали от центра "натуральными" числами.
То есть, если число простое, то оно не меняется, а если
число составное, то вместо него присваивается 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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
REM
REM     7  0  0
REM     0  0  2
REM     5  0  3
REM
 
DECLARE SUB MATR (x!(), m!, n!)
 
CLS
 
CONST n = 19
DIM x(1 TO n, 1 TO n)
DIM SHARED p(i TO 361)
DIM SHARED k
k = 1
p(2) = 2
p(3) = 3
 
FOR i = 5 TO 361
   FOR d = 3 TO i / 2
      IF i MOD d = 0 THEN 1000
   NEXT
   p(i) = i
1000
NEXT i
 
CALL MATR(x(), 9, 11)
x(10, 10) = 0
 
FOR i = 1 TO n
FOR j = 1 TO n
   PRINT USING "####"; x(i, j);
NEXT: PRINT
NEXT: PRINT
END
 
SUB MATR (x(), m, n)
   IF n = 20 THEN EXIT SUB
      
   FOR i = m + 1 TO n
      k = k + 1
      x(i, n) = p(k)
   NEXT i
 
   FOR j = n - 1 TO m STEP -1
      k = k + 1
      x(n, j) = p(k)
   NEXT j
 
   FOR i = n - 1 TO m STEP -1
      k = k + 1
      x(i, m) = p(k)
   NEXT i
 
   FOR j = m + 1 TO n
      k = k + 1
      x(m, j) = p(k)
   NEXT j
 
   CALL MATR(x(), m - 1, n + 1)
END SUB

Миниатюры

IT_Exp

Эксперт

34794 / 4073 / 2104

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

Сообщений: 32,602

Блог

15.12.2016, 16:10

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

Простые числа и матрица
Помогите написать программу с помощью только циклов: Написать программу, которая проверяет - являются ли значения, полученные по формуле...

Матрица и простые числа
Ввести матрицу размерностью (m*n) Найти строку содержащую наибольшее количество простых чисел. Помгите пожалуйсто составить программу. Есле...

Простые числа и матрица.
В понедельник экзамен, надо 2 проги написать: 1.Вывести простые числа первой сотни, группируя их в строчку следующим образом: первая...

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

BasicMan

Эксперт

29316 / 5623 / 2384

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

Сообщений: 30,364

Блог

15.12.2016, 16:10

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

Дана квадратная матрица А, содержащая натуральные числа
Дана квадратная матрица А, содержащая натуральные числа. Назовем строку особой, если разность максимума и минимума по строке является...

Дана квадратная матрица размером n x n, содержащая вещественные числа
Дана квадратная матрица размером n x n, содержащая вещественные числа. Определить сумму элементов в каждом столбце матрицы и упорядочить...

Данные действительные числа A1, ., A (N), действительная квадратная матрица порядка N (N> 8)
Данные действительные числа A1, ..., A (N), действительная квадратная матрица порядка N (N> 8). Получить действительную матрицу размера...

Даны целые числа a1…a10, целочисленная квадратная матрица порядка n
Даны целые числа a1…a10, целочисленная квадратная матрица порядка n. Заменить нулями в матрице те элементы с четной суммой индексов, для...

Определить, содержит ли заданная целочисленная квадратная матрица порядка n все числа от 1 до n^2
Определить, является ли заданная квадратная матрица размера n*n состоящей из целых чисел от 1 до n^2 , встречающихся по одному разу....

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

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

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

Наверх