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

var i:integer;beginfor i:=10 to 99 do if (i div 10 + i mod 10) mod 2=0 then write(i,' ');end.Результат:11 13 15 17 19 20 22 24 26 28 31 33 35 37 39 40 42 44 46 48 51 53 55 57 59 60 62 64 66 68 71 73 75 77 79 80 82 84 86 88 91 93 95 97 99