На обработку поступает положительное целое число,не - вопрос №10910799611 от Colnre 27.09.2020 17:10

Question

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

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