|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
20.11.2010, 12:54 | #1 |
Пользователь
Регистрация: 20.11.2010
Сообщений: 50
|
Random ограничения (pascal)
Как сделать так чтобы pascal рандомом выбирал 2 числа от одного до ста но a>b было?
Пример: Код:
Последний раз редактировалось _fynjy_; 20.11.2010 в 12:59. |
20.11.2010, 15:08 | #2 |
Раздолбайских Дел
Старожил
Регистрация: 22.05.2009
Сообщений: 3,828
|
Код:
Alar, верни репу!
|
20.11.2010, 15:58 | #3 |
Пользователь
Регистрация: 20.11.2010
Сообщений: 50
|
Спасибо, помогло
|
20.11.2010, 16:07 | #4 |
А может и не...
Участник клуба
Регистрация: 27.03.2010
Сообщений: 1,269
|
random(100) генерирует число в диапазоне 0..99, допустим, что А получилось равным 99+1=100. Тогда для В может быть получено число из диапазона 0..А-1+1. Допустим, что для В генерируется число 100-1+1, т.е. В=100. Имеем А=100 и В=100. Ну и чем тебе это помогло???
Перемешивай дело с бездельем и не сойдешь с ума...
|
20.11.2010, 16:11 | #5 |
Пользователь
Регистрация: 20.11.2010
Сообщений: 50
|
Логично, но при проверки ооочень много раз у меня b было меньше чем a, тем более b генерируется что a будет больше него или равно ему.
|
20.11.2010, 16:14 | #6 |
А может и не...
Участник клуба
Регистрация: 27.03.2010
Сообщений: 1,269
|
Вот придешь к преподу, а оно тебе сгенерирует А=100 и В=100 он тебе двояк и влепит... Заслуженно!!!
Перемешивай дело с бездельем и не сойдешь с ума...
|
20.11.2010, 16:21 | #7 |
Пользователь
Регистрация: 20.11.2010
Сообщений: 50
|
А как тогда так сделать?
Можно только надеяться на вероятность что a>b |
20.11.2010, 16:24 | #8 |
А может и не...
Участник клуба
Регистрация: 27.03.2010
Сообщений: 1,269
|
Да самое примитивно-простое - это b:=random(a)...
Перемешивай дело с бездельем и не сойдешь с ума...
|
20.11.2010, 16:25 | #9 |
Форумчанин
Регистрация: 02.01.2010
Сообщений: 254
|
Код:
UPD: меня опередили |
20.11.2010, 16:29 | #10 |
А может и не...
Участник клуба
Регистрация: 27.03.2010
Сообщений: 1,269
|
Вот поэтому и опередили... Фигли тут думать, тут писать надо! Как многие и делают... Шутка...
Перемешивай дело с бездельем и не сойдешь с ума...
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
ограничения доступа к сайтам | S_Yevgeniy | Свободное общение | 29 | 23.07.2010 12:59 |
ограничения на размер массива? | LOST94 | Общие вопросы C/C++ | 4 | 29.03.2010 09:50 |
Ограничения | Flatterer | Фриланс | 1 | 08.03.2010 20:16 |
Как обойти ограничения? | HAMMAN | Свободное общение | 3 | 19.12.2009 14:57 |
Ограничения панели инструментов | wnuks | Microsoft Office Excel | 5 | 01.07.2008 22:39 |