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

в Паскаль абс

Question

Марлеся

12 мая, 01:52

+2

Ответы (1)

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

Каздоя · Answer 1

var

i, e, d, n: integer;

begin

for i:=10 to 99 do

begin

e:=i mod 10;

d:=i div 10;

n:=e+d;

if n mod 2=0 then writeln (i) ;

end;

end.

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