|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
25.11.2016, 10:28 | #1 |
Форумчанин
Регистрация: 04.11.2016
Сообщений: 355
|
if random в диапазоне Pascal
Программа генерирует случайное число. Если число единица, то программа пишет "one". Если случайное число двойка, то программа пишет "two". Все это в небольшом диапазоне от 1 до 2. Как написать?
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код" |
25.11.2016, 10:30 | #2 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Random(2)+1 генерит 1 или 2
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
25.11.2016, 10:32 | #3 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
ну и "программа" полностью
Код:
|
25.11.2016, 14:17 | #4 | |
Форумчанин
Регистрация: 04.11.2016
Сообщений: 355
|
у меня генерирует только двойку.
Цитата:
А как сделать в диапазоне от 1 до 3?
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код" Последний раз редактировалось Аватар; 25.11.2016 в 14:25. |
|
25.11.2016, 14:25 | #5 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
А если подумать над магической формулой для 1 и 2?
И не плоди подряд тучу сообщений. Правь последнее сообщение, если за ним других нет. Кнопка Правка
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
25.11.2016, 14:48 | #6 |
Форумчанин
Регистрация: 04.11.2016
Сообщений: 355
|
Пробовал. Не получается.
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код" |
25.11.2016, 14:55 | #7 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Точно?! Вы нас не обманываете?
тогда чуть поясню. Random(N) возвращает целое число от нуля до N, причём НЕ ВКЛЮЧАЯ N (т.е. может быть случайное число, равное N-1) например, Random(2) вернёт псевдослучайное число 0 или 1 или, например, Random(5) вернёт псевдослучайное число: 0, 1, 2, 3, 4 Вы видите, что случайные числа начинаются от нуля. Если нужен другой диапазон, тогда нужно добавить смещение. например, если нужны числа от 2 до 7, тогда мы (1) подсчитываем, сколько чисел от 2 до 7 ===> ответ 6 2) смещение от нуля равно 2 (0+2 = 2) получаем готовую формулу 2 + Random(6) теперь справитесь с формулой для чисел от 1 до 3 ?! |
25.11.2016, 15:07 | #8 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Небось if ... then ... else if ... не получается? Тогда уж лучше case использовать или массив с наименованиями цифр
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
25.11.2016, 15:20 | #9 |
Форумчанин
Регистрация: 04.11.2016
Сообщений: 355
|
А как это написать?
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код" |
25.11.2016, 15:44 | #10 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Код:
Код:
Код:
Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Random и BigInteger (Pascal ABC) | Danilkoo832832 | Lazarus, Free Pascal, CodeTyphon | 12 | 30.08.2016 15:55 |
Random (Pascal) | spinogryz_ua | Помощь студентам | 3 | 23.01.2013 00:13 |
Random (pascal) | spinogryz_ua | Помощь студентам | 6 | 09.01.2013 13:50 |
pascal random | S0ap | Помощь студентам | 2 | 10.07.2011 17:49 |
Random ограничения (pascal) | _fynjy_ | Помощь студентам | 24 | 11.01.2011 10:19 |