Ответ:

Паскаль

uses crt;

var a,b,sum:integer;

begin

readln(a,b);

write(a+b);

if (a+b) mod 2 = 0 then write('Чётная')

                             else write('Нечётная');

end.

Ответ:

Паскаль

uses crt;

var a,b,sum:integer;

begin

readln(a,b);

write(a+b);

if (a+b) mod 2 = 0 then write('Чётная')

                             else write('Нечётная');

end.

Объяснение: