Дано 3 двузначных числа. Вывести на экран те числа, в которых сумма цифр является четным числом.

var a,b,c : integer; begin writeln ('Введите первое число'); readln (a); if a mod 2=0 then writeln ('Это число является чётным') else writeln ('Это число является НЕчётным'); writeln ('Введите второе число'); readln (b); if b mod 2=0 then writeln ('Это число является чётным') else writeln ('Это число является НЕчётным'); writeln ('Введите  третье число'); readln (c); if c mod 2=0 then writeln ('Это число является чётным') else writeln ('Это число является НЕчётным'); end.