Question

Дано 3-х значное число N. Проверить, будет ли сумма его цифр чётным числом.

Answer 1

read(n);

s = str(n);

n1 := int(s[1]);

n2 := int(s[2]);

n3 := int(s[3]);

 

if (n1+n2+n3) mod 2 = 0 then writeln("Сумма чисел четная")