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

Var n,n1,n2,sum:integer;
Begin 
 write(Введите двузначное число: ); readln(n); 
n1:=n div 10; 
n2:=n mod 10; 
sum:=n1+n2; 
if (sum mod 2 = 0) then write(1) 
else writeln(0);



End.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.