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