Сколько раз выполнится цикл?
for i:= 25 downto 1 do t := random(30);

Ответы

Ответ дал: unnamedhostname2
0

25 раз.

Вытяжка из https://wiki.freepascal.org/For/ru:

"for I:=100 downto 1 do ''statement'';

(повторяет statement сто раз, уменьшая значение I от 100 до 1)"

Вас заинтересует