Question

Напишите программу на Pascal,которая выводит на экран арифметическую прогрессию от 10 до 100 с шагом 10( цикл ПОКА)

Answer 1

var

i: integer;

begin

i:= 10;

while i <= 100 do

begin

write(i,' ');

i:= i + 10;

end;

end.