Дан массив из 20 чисел, найти сумму всех четных чисел.

Напишу алгоритм дальше сам додумаешь! for i: =1 to 20 do begin if (i mod 2 =0) then s: =s+a[i]; end; что не понятно пиши комент!  

если возникает ошибка "undefined reference", компилируйте с флагом -lm

#include < stdio.h>

#include < math.h>

int main(void)

{

int

  x[3],

  y[3],

  index;

for(int i = 0; i < 3; i++)

  scanf("%d%d", & x[i], & y[i]);

float min = sqrt(pow(x[0], 2) + pow(y[0], 2));

for(int i = 1; i < 3; i++)

{

  float tmp = sqrt(pow(x[i], 2) + pow(y[i], 2));

  if(tmp < min)

  {

  min = tmp;

  index = i;

  }

}

printf("ближайщая точка к началу координат: %c\n", (index == 0) ? 'a' : (index == 1) ? 'b' : 'c');

return 0;

}

var

    x, y, result: real;

begin

    readln(x, y);

    result : = 1;

    if y > 0 then

    begin

        while y < > 0 do

        begin

            result : = result * x;

            y : = y - 1;

        end;

    end

    else if y < 0 then

    begin

        while y < > 0 do

        begin

            result : = result * x;

            y : = y + 1;

        end;

        result : = 1 / result;

    end

    else result : = 1;

       

    writeln('x^y = ', result);

end.