Ответ:
Цикл с параметром оформляется так: for имя параметра := начальное значение to конечное значение do оператор. При использовании to параметр увеличивается на единицу. Для убывания применяется downto.
for i := 1 to 5 do
WriteLn(i);
Параметр цикла должен иметь порядковый тип, а его начальное и конечное значения — совместимый тип.
