Напишите программу которая в последовательности натуральных чисел определяет количество чисел кратных 4.Программа получает на вход количество чисел в последовательности а затем сами числа.В последовательности всегда имеется число кратное 4.Количество чисел не превышает 1000.Введенные числа не превышают 30000 программа должна вывести одно число количество чисел кратных 4.Решите пожалуйста
VarA, k, b,i:integer$BeginReadln (b)$K:=0$For i:=1 to b doBeginReadln(a)$If a mod 4=0 then k:=k+1$End$Writeln(k)$End.P. S. Вместо $ должна быть точка с запятой, но я не нашел ее у себя в телефоне
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
