Помогите! Дан массив от 1 до 10. найти сумму четных элементов массива. ПАСКАЛЬ 9 КЛАСС

Question

Помогите! Дан массив от 1 до 10. найти сумму четных элементов массива.
ПАСКАЛЬ 9 КЛАСС

Answer 1

Начало писать не буду.. Там сё элементарно..
...
readln(a);
if(a mod 2=0) then
s:=s+a;
end;
writeln(s);
End.