![]() |
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
![]() |
1147 |
![]()
Сообщение
#1
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 205 Пол: Мужской Реальное имя: Евгений Репутация: ![]() ![]() ![]() |
Например нам нужно каждый раз, при нажатии кнопки, получать разные числа в диапазоне 0..99:
begin
Randomize;
begin
int := Random(100);
end;
Но бывает что randomize 2 (или больше) раза подряд выдает одно и тоже число. Можно ли както этого избежать? Исключить повторение двух чисел подряд? |
![]() ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Запоминай предыдущее значение, и сравнивай со вновь сгенерированным:
var prev: integer = 100; // глобально
// ...
begin
repeat
i := random(100);
until i <> prev;
prev := i;
end;
|
1147 |
![]()
Сообщение
#3
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 205 Пол: Мужской Реальное имя: Евгений Репутация: ![]() ![]() ![]() |
спасибо, получилось!
|
![]() ![]() |
![]() |
Текстовая версия | 25.07.2025 8:38 |