:с введите с клавиатуры 5 положительных чисел.вычислите - вопрос №51495347 от hahahagall 13.03.2021 17:07

Question

Информатика: :с введите с клавиатуры 5 положительных чисел.вычислите сумму тех из них,которые делятся на 4 и при этом заканчиваются на 6.программа должна вывести одно число: сумму чисел,введенных с клавиатуры, кратных 4 и оканчивающихся на 6.

hahahagall · Answer

var a,sum,i:integer;beginfor i:=1 to 5 dobeginreadln (a);if (a mod 4=0) and (a mod 10=6) then sum:=sum+a;end;writeln (sum);readln;end.  ...