Составить программу, выдающее сообщение true/false если сумма двух натуральных чисел кратна 2

var x, y, c:real;
begin
c:=y+x;
writeln('Введите 1 число');
readln(x);
writeln('Введите 2 число');
readln(y)
if c mod 2=0
then writeln('true')//или сумма чисел делится на 2
else writeln('false')//или сумма чисел не делится на 2
end.