На обработку поступает положительное целое число,не - вопрос №10799211109 от adidas2963 20.07.2022 15:47

Question

Информатика: На обработку поступает положительное целое число,не превышающие 10 в 9 степени.Нужно написать программу которая выводит на экран сумму честных цифр этого числа,не меньших 5.

adidas2963 · Answer

var s,n:integer;begins:=0;readln(n);while n 0 do beginif ((n mod 10) mod 2 = 0) and (n mod 10 =5) thens:=s+n mod 10;n:=n div 10;end;writeln(s);end....