Решить с case дано натуральное число n. найти произведение четных цифр данного числа
sobakazabiyaka
2
31.05.2019 13:00
0
Другие вопросы по теме Информатика
Dav134
21.12.2020 13:02
fbnjvtlchenko
21.12.2020 13:02
andreyshilenko
21.12.2020 13:03
Оpiggyugrs
21.12.2020 13:03
129697113
21.12.2020 13:03
yousei1234
03.07.2019 16:50
sashamur20051
03.07.2019 16:50
maloyzolotov
24.12.2019 15:20
Популярные вопросы
- Магнітний потік,що пронизує змкнену катушку ,яка має 100 вітків проводу рівно...
2 - Скільки електронів і протонів мають атом Алюмінію та йон АІ³+? В атомі якого...
2 - Взгляните на это… https://pin.it/1NokrHr знаете что за група ???...
2 - Сторони основ правильно зрізаної чотирикутної піраміди дор нюють 10 см і 6 см,...
3 - Обчислити сумарну кількість протонів і електронів в...
3 - Смесь состоит из 0,2 моль фосфорной кислоты H3PO4 и 7,525 ⋅1024 молекул воды....
3 - Алгебра ) Решите примеры сразу под цифрами (на ниже ответ не обращайте внимание,...
3 - іть на малюнку AM=BN кут AMN=кут BNM доведіть що кут BMN=кут ANM...
2 - Найди синус острого угла если дан косинус того же угла. cosa =15/17 то sina...
3 - Наслідки Першої світової для Великобританії....
2
readln ( a );
c:=1;
while a> 0 then
begin
b:=a mod 10;
case b of
0,2,4,6,8: c:=c*b;
end;
a:=a div 10;
end;
writeln ( c );
ebd.