Делаете 3 TEdit: 2 для ввода диапазона, один для ввода ответа. 2 кнопки: по одной начинается тест (запоминаются границы диапазона), по другой проверяется ответ.
Начало теста - считываем в переменные Min и Max границы, получаем рандом так:
Код:
value := random(Max+1)-Min;
По нажатию второй кнопки проверяем, принадлежит ли введенное число указанному диапазону, если нет - пишем ошибку, если да - сравниваем с value, выдаем результат и увеличиваем счетчик попыток. Условия выхода и так понятны.
Весь алгоритм я рассказал. Если же хотите, чтобы вам кто-то нахаляву написал код, то так и говорите: "Напишите мне программу." Либо кому-нибудь будет совсем нечего делать, и вам напишут код, или же сразу пишите в раздел "Работа" данного форума, где за определенную плату получите программу. Или воспользуйтесь поиском.