В паскале АВС составте программу которая будет считать нули в числе ! Именно в Паскале АБС
Var A,n : Integer;
Begin
n:=0;
Readln(A);
While A>0 do
Begin
If A mod 10 = 0 then Inc(n);
A:=A div 10;
end;
Writeln(Нулей в числе: ,n);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
