Решите по информатике ввести любое число посчитать количество четных цифр у этого числа (сумму цифр числа)

268

459

Посмотреть ответы 2

Ответы на вопрос:

2303010

Информатика

4,7(38 оценок)

Отдел +; использует вывод из "", приём из ""; пер число, чётных, сумцифр, цифра: цел; указ число : = приём.число(); чётных : = 0; сумцифр : = 0; пока число > 0 вып цифра : = число остаток 10; если чет(цифра) то увеличить(чётных) кон; увеличить(сумцифр, цифра) кон; число : = число делить 10 кон; вывод.чцел("^%d %d", чётных, сумцифр, 0, 0) кон .