4. Напиши примери, в които може да използваш блок за избор на случайно Число.

Первая программа:
В ней ты вводишь число Б с клавиатуры,и проверяешь через цикл является ли б минимальным числом,если введённое б<32000,то оно-минимальное
Вторая:
Вводишь н для количества повторений цикла
Пока не дошло до числа н, вводишь  с клавиатуры А,далее каждое А проверяется на условия: минимальное число(32000 по условию)>а,а делится на пятнадцать без остатка,а>0, если все эти условия соблюдены,то а-минимальное число.
Без цикла проверяет остаток от деления числа А на 15 и записывает остаток от деления в переменную Б
Выводит на экран минимальное число и значение переменной Б
Третья:
Проверяет условие: переменная А больше Б,если да,то выводит на экран переменную А,если нет-то выводит на экран переменную Б

Могу в предложить в данном случае использовать goto и метки. Ну, если вы имеете какой то признак неправильных данных, например, это отрицательные значения (предположим, что это неправильные данные) То на этапе, когда вы вводите эти значения, вы должны поставить условный оператор. Т.е.
if a<0 tnen
begin
Writeln('Вы ввели неверные данные');
goto 1
else
goto 2;
Метку 1 вы ставите в начало алгоритма, т.е. туда, откуда вы хотите начать повторное выполнение программы, а метку 2 поставить в продолжение алгоритма, т.е. на тот случай, если данные были введены верно