:с введите с клавиатуры 5 положительных чисел.вычислите - вопрос №14951225 от Котя5461 24.05.2022 12:02

Question

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

Котя5461 · 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.  ...