Придумайте задачу в которой можно использовать цикл с параметрами, но нельзя использовать цикл for с параметрами.
Var a:integer; begin repeat writeln('Введите натурально число не больше 100'); readln(a); untill (a>0) and (a<100);<br>end. // Запомни такой пример много где спрашивается... ( repeat цикл с потусловием)
Спасибо ^.^