Напишите программу, которая в последовательности - вопрос №1710586 от ромкапомка1 10.04.2022 05:04

Question

Информатика: Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 4. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, кратное 4. количество чисел не превышает 1000. введённые числа не превышают 30 000.

ромкапомка1 · Answer

var a: array [1..1000] of integer;        n, i, k: integer; begin readln (n); for i:=1 to n do readln (a[i]); k:=0; for i:=1 to n do if a[i] mod 4 = 0 then k:=k+1; writeln (k); end....