суммирование элементов массива Опции

[need love]

попытка №2. че-то совсем не получается(

помогите)) спасибо заранее^.^

Подсчитать сумму элементов в одномерном массиве из 15 элементов, которые определяются по формуле: A(I)=2∙I+10.

[klem4]

Убираем 15 лишних операций сложения

var sum,i: integer;
begin
  sum:=0;
  for i:=1 to 15 do
    sum:=sum+2*i;
  writeln('сумма: ',sum + 150);
end.