Составить программу,выводящую на экран четные числа от 10 до 20,по одному числу в строке.
Составить программу,выводящую на экран четные числа от 10 до 20,по одному числу в строке.
Гость
Ответ(ы) на вопрос:
ГостьProgram z8;
Var p:integer;
Begin
p:=8;
while p<20 do
begin
p:=p+2;
writeln(p);
end;
end.
Не нашли ответ?
Похожие вопросы