Как переписать цикл while на цикл for? (в программе приведённой ниже) условие: Вывести на экран ряд натуральных чисел от минимума до максимума с шагом. Например, если

минимум 10, максимум 35, шаг 5, то вывод должен быть таким: 10 15 20 25 30 35 Минимум, максимум

и шаг указываются пользователем (считываются с клавиатуры).

Программа:
var a,b,c: integer;
begin
readln(a);
readln(b);
readln(c);
while a<=b do begin
write(a,' ');
a := a+c;
end;
writeln;
end.

диана2459    3   26.11.2021 11:37    1