![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#3
|
||||
|
||||
![]() Делаете 3 TEdit: 2 для ввода диапазона, один для ввода ответа. 2 кнопки: по одной начинается тест (запоминаются границы диапазона), по другой проверяется ответ.
Начало теста - считываем в переменные Min и Max границы, получаем рандом так: Код:
value := random(Max+1)-Min; Весь алгоритм я рассказал. Если же хотите, чтобы вам кто-то нахаляву написал код, то так и говорите: "Напишите мне программу." Либо кому-нибудь будет совсем нечего делать, и вам напишут код, или же сразу пишите в раздел "Работа" данного форума, где за определенную плату получите программу. Или воспользуйтесь поиском. jmp $ ; Happy End! The Cake Is A Lie. Последний раз редактировалось Bargest, 17.01.2012 в 12:33. |