Составить программу, использую цикл while do. Вывести числа в следующем порядке 2, 4, 6, 8,10 ... 20 Паскаль

Question

Мироха

11 августа, 00:06

+5

Ответы (1)

Знаете ответ на вопрос?

Петруня · Answer 1

Var a:integer;

begin

a:=0;

while a<20 do

begin

a:=a+2;

write (a,' ') ;

end;

end.

Результат:

2 4 6 8 10 12 14 16 18 20