составьте программу которая определяет являеться ли сумма цифр введённого целого трёхзначного числа чётным числом
Ответы
Ответ дал:
0
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.
Похожие вопросы
2 года назад
7 лет назад
10 лет назад
10 лет назад