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

в Паскаль абс

Question

Аверкий

26 июня, 22:29

+4

Ответы (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.

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