Напишите программу которая в последовательности натуральных чисел определяет количество чисел кратных 4.Программа получает на вход количество чисел в последовательности а затем сами числа.В последовательности всегда имеется чис...

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