Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.