Дан массив из N натуральных чисел. Создать массив из четных чисел этого массива. Если таких чисел нет, то вывести сообщение об этом факте. программа в с написать программу

10*10*1=100 b=12,5 b

vara: array[1..500] of integer; i,k,n: integer; begink: =0; write('n= '); readln(n); for i: =1 to n do readln(a[i]); for i: =1 to n do k: =k+a[i]*a[i+1]; writeln(k); end.

3*3: (3*3)=1

(3*3-3): 3=2

3*3-(3+3)=3

(3*3+3): 3=4

(3+3): 3+3=5

(3+3-3)+3=6

(3: 3+3)+3=7

3*3-(3: 3)=8

3*3-(3-3)=9

3*3+3: 3=10

2000 - k

16 бита - i

v=k*i=2000*16=32000 бита=4000 байтов