Для натурального числа a составить программу подсчёта в нём кол-во нечётных цифр . ))

anya2403 anya2403    3   26.07.2019 14:50    0

Ответы
Яна00311 Яна00311  03.10.2020 13:34
Var a, s,m: integer;
beginread(a); 
while a>0 do begin 
m:=a mod 10; 
if m mod 2 <>0 then s:=s+1; 
a:=a div 10; 
end; 
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика