масив из 14 чисел надо найти суму парных элементов масива

[aionpro]

есть масив из 14 чисел надо найти суму парных элементов масива

[WorldMaster]

Кому надо?

[Sciv]

Задание неполное и неточное.

1) Предположим, есть массив: [1; 1; 2; 3; 4; 4; 5; 5; 6; 7]
Парные элементы 1-1, 4-4, 5-5. Их суммой будет считаться 1 + 4 + 5 или 1 + 1 + 4 + 4 + 5 + 5?

2) В массиве [1; 2; 3; 4; 5; 2; 3; 7; 8; 9] считаются ли парными элементы, не стоящие рядом (в данном случае 2 - 2 и 3 -3)?

[Aleksandr H.]

'some loop
...
if not(odd(a[i])) then inc(Count);
...
'end loop

[Serge_Bliznykov]

Сообщение от Sciv

Парные элементы

коллега, тут "парные" - это "чётные" (пер. с украинского)

Сообщение от Aleksandr H.

if not(odd(a[i])) then inc(Count);

ну, тогда уже

sum:=0;
for i:=1 to 14 do
  if not(odd(a[i])) then sum := sum + a[i];

[Sciv]

Сообщение от Serge_Bliznykov

коллега, тут "парные" - это "чётные" (пер. с украинского)

афигеть, блин. Поменял язык - поменялся смысл задания

[p51x]

Вот поэтому языки форума зафиксированы и только особо продвинутые плюют на это.

[Аватар]

Просто забыл ТС перевести одно слово, может и не знал как. В остальном не вижу плевка в сторону форума. Кстати не сказано, что четных по значению, может по индексу. ТС небось и сам не знает ))

[Aleksandr H.]

Ему надо те кот. нацело делятся на 2. Все намного проще, это ведь задание какой-то шараги, без каких либо переподвыпердов.