На обработку поступает положительное целое число,не - вопрос №10800113109 от polinaserdiuk4 24.02.2022 17:45

Question

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

polinaserdiuk4 · 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....