Напечатать числа от A до B c шагом С. Первые два числа — диапазон, третье число — шаг. Все числа — целые в диапазоне -32000..+32000 — Pascal(Паскаль)

var
a,b,s:integer;
begin
readln(a);
readln(b);
readln(s);
while a<b do
begin
write(a,' ');
a:=a+s;
end;
readln;
end.

Leave a Comment

81 − = 73