:с введите с клавиатуры 5 положительных чисел.вычислите - вопрос №14960245 от GiftOfDeath 26.03.2022 04:42

Question

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

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