Question

Дан одномерный массив натуральных чисел из 12 элементов. Найдите количество четных чисел.

Answer 1

(если i - кол-во элементов массива, a[i] - массив; добавить в переменные k-количество четных чисел, integer)
k:=0
from i=1 to 12 do
if a[i] mod 2 = 0 then k:=k+1
не забудь вывести значение, если необходимо

Answer 2

получается вот так?:

Answer 3

Program P1; Uses crt; Var i,xinterger; A:array[1...12] of integer; Begin x:=0 From I=1 to 12 do

Answer 4

if a[i] mod 2 = 0 then k:=k+1; Writeln (A[I], ' ') End