Нашел код на паскале но мне надо его на питоне, напишите пожалуйста или объясните как делать???
Var m,k:longint;
Begin
write('Введите M: ');readln(m);
While m>0 do
Begin
if m mod 10 mod 2 = 0 then inc(k);
m:=m div 10;
End;
writeln('Чётных цифр = ',k);
readln;
End.


uagamertv2005: зачем тебе?

Ответы

Ответ дал: uplmtq
1

Ответ:

k = int(0)

m = int(input("Введите M: "))

while m > 0:

 if m % 10 % 2 == 0:

   k += 1

 m //= 10

print("Четных цифр = ", k)

Объяснение:

k = int(0)  // Создание целочисленной переменной k и присвоение ей значения 0 (ноль)

m = int(input("Введите M: "))  // Ввод с клавиатуры целочисленной переменной m

while m > 0:  // Пока значение переменной m > 0

 if m % 10 % 2 == 0:  // Если остаток от деления значения переменной m на 10 и на 2 = 0

   k += 1  // К значению переменной k прибавляем 1 (единицу)

 m //= 10  // Отделяем последнее число от значения переменной m путем целочисленного деления на 10

print("Четных цифр = ", k) // Вывод значения переменной k

Вас заинтересует