Есть ответ 👍

Написать программу которая для введённого пятизначного числа выводит количество нулей в нем

243
425
Посмотреть ответы 3

Ответы на вопрос:

knaletov
4,7(64 оценок)

Var     n: integer; begin   read(n);   write(ord(n mod 10 = 0) + ord(n div 10 mod 10 = 0) + ord(n div 100 mod 10 = 0) + ord(n div 1000 mod 10 = 0)); end.

Вот уже писал.uses crt; var a,n,i: integer; begin clrscr; write('vvedite chislo: '); read(a); n: =0; while a< > 0 do begin if a mod 10=0 then inc(n); a: =a div 10; end; writeln('n=', n); end.

777(8)=1769(10) 375(8)=627(10) 111(8)=73(10) последнее не могу решить

Популярно: Информатика