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

Darina784 Darina784    3   21.03.2019 04:00    2

Ответы
Арукаа11 Арукаа11  26.05.2020 11:55

var
a,b,c,d,e:integer;
begin
read(a);
c:=a mod 10 ;
b:=a div 10 mod 10;
d:= a div 100 mod 10;
e:=c+d+b;
if e mod 2 =0
then write('Четное')
else write('Нечетное'); end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика