Составить программу, выводящую на экран все двузначные числа, у которых первая цифра четная.

Question

Светуня

19 января, 06:32

+5

Ответы (1)

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

Иннушка · Answer 1

Var i:integer;

begin

for i:=20 to 89 do

if i div 10 mod 2 = 0 then write (i,' ') ;

end.

Результат:

20 21 22 23 24 ... 85 86 87 88 89