Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 19.11.2009
Сообщений: 47

Составить программу генератора

25.11.2009, 18:43. Показов 948. Ответов 8
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогите Составить программу генератора простых чисел, в основу положить форму 2х в квадрате + 29 при 0<=x<=28
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
25.11.2009, 18:43
Ответы с готовыми решениями:

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

Составить алгоритм позволяющий с 50% точностью предсказать действие генератора
Здравствуйте. У меня есть вопрос к аудитории форума. Есть генератор псевдослучайных чисел.... Частота генератора меняется в случайный...

Нужно создать программу генератора паролей
Помогите создать программу генератора паролей он должен генерировать пароли длиной 8 символов, соотношение паролей должно быть такое: ...

8
Платежеспособный зверь
 Аватар для кот Бегемот
8966 / 4389 / 1655
Регистрация: 28.10.2009
Сообщений: 11,647
25.11.2009, 18:45
Цитата Сообщение от Дмитрий92 Посмотреть сообщение
помогите Составить программу генератора простых чисел, в основу положить форму 2х в квадрате + 29 при 0<=x<=28
Ну, и в чём дело?

Pascal
1
2
for x:=0 to 28 do
writeln(2*x*x+29);
0
0 / 0 / 0
Регистрация: 19.11.2009
Сообщений: 47
25.11.2009, 18:48  [ТС]
а почему вывод такой?
0
code code
 Аватар для Шутка
128 / 123 / 77
Регистрация: 11.10.2009
Сообщений: 375
25.11.2009, 18:48
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses crt;
var
x,y:integer;
begin
randomize;
writeln('x=');
readln(x);
if x>29 then writeln('x doljen bit <29');
if x<0 then writeln('x doljen bit >0');
y:=random(x*x+29);
writeln(y);
end.
Непонял немного. Как-то так?
0
0 / 0 / 0
Регистрация: 19.11.2009
Сообщений: 47
25.11.2009, 19:01  [ТС]
Че то кажется не то
0
Платежеспособный зверь
 Аватар для кот Бегемот
8966 / 4389 / 1655
Регистрация: 28.10.2009
Сообщений: 11,647
25.11.2009, 19:08
Программа

Pascal
1
2
3
4
5
6
var
x:integer;
begin
for x:=0 to 28 do
writeln(2*x*x+29);
end.
выводит все простые числа, которые может сгенерировать эта формула. Именно это и спрашивается

в предыдущей программе выводится 1 число и формула неверна
0
0 / 0 / 0
Регистрация: 19.11.2009
Сообщений: 47
25.11.2009, 19:17  [ТС]
А почему ты вывод формулы пишешь?
0
code code
 Аватар для Шутка
128 / 123 / 77
Регистрация: 11.10.2009
Сообщений: 375
25.11.2009, 19:18
Да, формула не верна, не все значения будет находить.
А одно значение одно "Генератор"ом навеяло.. думал ему рандом нужно 1 число.
вообщем, поэтому и написал "как-то так" =)
Автор сам не знает чего хочет. обьяснить изначально трудно было?

Добавлено через 28 секунд
Цитата Сообщение от Дмитрий92 Посмотреть сообщение
А почему ты вывод формулы пишешь?
Вы смешной. удачи =)
0
Платежеспособный зверь
 Аватар для кот Бегемот
8966 / 4389 / 1655
Регистрация: 28.10.2009
Сообщений: 11,647
25.11.2009, 19:25
когда написано writeln(математическое выражение) паскаль сначала вычисляет значение выражения, а потом выводит
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
25.11.2009, 19:25
Помогаю со студенческими работами здесь

Составить программу,используя оператор Repeat.Составить программу для определения N!-M!,где N!=1*2*3...n.
Составить программу,используя оператор Repeat.Составить программу для определения N!-M!,где N!=1*2*3...n.

Переделать программу без использования генератора случайных чисел
Const n=6;m=8; Type mas=array of integer; Var C,D:mas; i,x,y:integer; Procedure Add(Var A:mas;n,x:integer); Var i:byte; ...

Написать программу, заносящую в файл 10 целых чисел с использованием генератора случайных чисел
Написать программу, заносящую в файл 10 целых чисел с помощью генератора случайных чисел. Считать этот файл в обратном порядке, вывести на...

Строка: Составить программу,определяющую можно ли из букв слова А составить слово В.
Даны два слова.Составить программу,определяющую можно или нет из букв слова А составить слово В.

Составить блок схему вычисления значения функции, а затем составить программу
Составить блок схему вычисления значения функции, а затем составить программу


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

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru