Задача Закончить программу решения задач. Дано трехзначное число N. Проверить, будет ли сумма его цифр четным числом.

Question

Информатика

Гонората

15 февраля, 10:44

Задача Закончить программу решения задач. Дано трехзначное число N. Проверить, будет ли сумма его цифр четным числом.

+3

Ответы (1)

Знаете ответ на вопрос?

Васильюшка · Answer 1

Program ggh;

var n, s:integer;

begin

writeln ('введите трехзначное число n') ;

readln (n) ;

s:=n div 100+n div 10 mod 10+n mod 10;

if s mod 2=0 then writeln ('будет') else writeln ('не будет') ;

end.