Сколько раз выполнится цикл? for i:= 25 downto 1 do t := random(30);
Какой язык
Сам как считаешь, если от 25 до 1 досчитать? Загибай пальцы...
25 раз.
Вытяжка из https://wiki.freepascal.org/For/ru:
"for I:=100 downto 1 do ''statement'';
(повторяет statement сто раз, уменьшая значение I от 100 до 1)"
25 это правильный ответ! Только что проверила в фоксфорд!