Предмет: Информатика, автор: 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.

Ответы

Автор ответа: DeLaFere
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
Предмет: Другие предметы, автор: milka10775