Предмет: Информатика,
автор: 3prokent
Имеется код написанный на паскале, необходимо перевести его питон.
var
k,n:longint;
begin
readln(k);
while k mod 10=0 do
k:=k div 10;
while k>0 do
begin
if k mod 10=0 then inc(n);
k:=k div 10;
end;
writeln(n);
end.
Ответы
Автор ответа:
1
Ответ:
Объяснение:
n=0
k=int(input('k='))
while k%10==0:
k=k//10
while k>0:
if k%10==0:
n+=1
k=k//10
print(n)
Похожие вопросы
Предмет: Другие предметы,
автор: viktoria4758
Предмет: Русский язык,
автор: viktorjdmdrift
Предмет: Другие предметы,
автор: milka10775
Предмет: История,
автор: arinasaxaryk