попытка №2. че-то совсем не получается(
помогите)) спасибо заранее^.^
Подсчитать сумму элементов в одномерном массиве из 15 элементов, которые определяются по формуле: A(I)=2∙I+10.
uses crt;
var a: array[1..15] of integer;
sum,i: integer;
begin
sum:=0;
for i:=1 to 15 do
begin
a[i]:=2*i+10;
sum:=sum+a[i];
write(a[i]:4);
end;
writeln(' сумма:',sum,'');
end.
uses crt;
var sum,i: integer;
begin
sum:=0;
for i:=1 to 15 do
sum:=sum+2*i+10;
writeln('сумма: ',sum);
end.
var sum,i: integer;
begin
sum:=0;
for i:=1 to 15 do
sum:=sum+2*i;
writeln('сумма: ',sum + 150);
end.