Ошибка в задачнике aarray13

[galena_geras]

Ошибка в условии задачи или в тестах. Вместо четных индексов работает при нечётных.

//AArray13. Найти сумму элементов массива //с четными индексами. uses pt4; var a:array[1…20] of real; s:real; i,n:integer; begin task(‘aarray13’); readln(n); for i:=1 to n do read(a[i]); s:=0; FOR i:=1 TO N DO if i mod 2=0 then s:=s+a[i];
writeln(s) end.

[Sun_Serega]

Для начала выделите код так, а то нечитабельно:

```
код
```

Знак ` находится в англ. раскладке за буквой ё.