Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
1

Число вариантов разложения четных чисел на сумму простых чисел

24.08.2016, 12:49. Показов 1092. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Известно, что
4=2+2 (один вариант разложения четного числа на сумму двух простых)
6=3+3 (один вариант)
8=3+5 (один вариант)
10=3+7=5+5 (2 варианта)
12=5+7 (1 вариант. Далее число вариантов будет расти)
14=3+11=7+7 (2)

Задача.
Найти число вариантов разложения четных чисел на сумму
двух простых чисел.
Эта программа дает графический ответ для 640 четных чисел
(от 4 до 1280) (смотрите рисунок)
примечание
Расчет на VB6 подтверждает сказанное для гораздо большего
множества четных чисел.

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
CLS
SCREEN 11
WINDOW (1, 0)-(640, 40)
 
FOR n = 3 TO 640
   k = 0
   FOR p = 3 TO n STEP 2
      q = 2 * n - p
      
      FOR d1 = 3 TO p / 2 STEP 2
         IF p MOD d1 = 0 THEN 100
      NEXT d1
 
      FOR d2 = 3 TO q / 2 STEP 2
         IF q MOD d2 = 0 THEN 100
      NEXT d2
      k = k + 1
100
   NEXT p
   LINE (n - 1, k1)-(n, k)
   k1 = k
NEXT n
LINE (0, 0)-(640, 20)
END
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.08.2016, 12:49
Ответы с готовыми решениями:

Даны набор ненулевых целых чисел; признак его завершения - число 0. Вывести сумму всех положительных четных чисел из эт
Даны набор ненулевых целых чисел; признак его завершения - число 0. Вывести сумму всех...

Begin108. Дан набор ненулевых целых чисел; признак его завершения — число 0. Вывести сумму всех положительных четных чисел из данного набора. Если тре
Begin108. Дан набор ненулевых целых чисел; признак его завершения — число 0. Вывести сумму всех...

Задано целое число N. Найдите сумму простых чисел до N
С. Задано целое число N. Найдите сумму простых чисел до N. 1<=N<=1000 C.in 5 C.out 10 comment...

Найти сумму простых чисел, не превышающих данное число n
Код программы, но считает неправильно. когда n = 10, простые меньше 10: 2, 3, 5, 7. их сумма 17, а...

3
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
24.08.2016, 12:51  [ТС] 2
Вот рисунок
(он почему-то не загрузился)
Миниатюры
Число вариантов разложения четных чисел на сумму простых чисел  
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
32835 / 21172 / 8148
Регистрация: 22.10.2011
Сообщений: 36,431
Записей в блоге: 8
24.08.2016, 18:44 3
Цитата Сообщение от geh Посмотреть сообщение
6=3+3 (один вариант)
Куда делись варианты 1+2+3, 1+1+1+1+1+1, 2+2+2, и так далее? Что за самописные правила такие?
0
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
24.08.2016, 21:05  [ТС] 4
volvo
Я приношу извинения за то, что не совсем четко сформулировал
условия задачи. Мне казалось, что такая формулировка очевидна.
Задача. (geh)
Найти число вариантов разложения четных
чисел на сумму двух простых чисел.
примечание
Число 1 не является простым число, да и составным тоже.
0
24.08.2016, 21:05
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.08.2016, 21:05
Помогаю со студенческими работами здесь

Представить число, как сумму двух простых чисел
Задание: Дана последовательность чисел, законченная 0 (в последовательность не входит). Представить...

Дано целое число N. Найти сумму простых чисел от 2 до N
дано целое число N.найти сумму простых чисел от 2 до N. 2<=N<=1000000 надо сделать с помощью 2...

Как из последовательности 20 чисел вычислить сумму нечетных чисел и определить количество четных чисел.
Помогите пожалуйста !!!! Из последовательности 20 чисел вычислить сумму нечетных чисел и...

Для N вводимых с клавиатуры чисел определить количество четных чисел и сумму нечетных чисел
Для N вводимых с клавиатуры чисел определить количество четных чисел и сумму нечетных чисел.


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru