var n,n1:integer;
begin
write('n=');
readln(n);
while n<>0 do begin
if n div 2=0 then
writeln('n=');
end;
readln;

end.

a = int(input("a = "))

p = 1

while a != 0:

   if (a % 10) % 2 == 0:

       p = p * (a % 10)

   a = a // 10

print("p =",p)

Объяснение:

Ввод числа

Считаем произведение, поэтому p = 1 (число умножить на 1 равно число)

Пока число не равно 0

Если последняя цифра числа чётная, то вычисляем произведение

Число равно целочисленному делению числа на 10 (отбрасываем последнюю цифру числа)

Вывод произведения