Сформируйте одномерный массив из 4 элементов ( значения элементов зависит от порядкового номера массива и вычисляется по формуле i^2) . Вычислить сумму значений элементов одномерного массива.

Program Zadacha;
Var a: Array [1..4] of Integer;
sum, i: Integer;
Begin
For i := 1 To 4 Do
Begin
a[i] := i * 2;
sum := sum + a[i];
End;
WriteLn(Сумма: , sum);
ReadLn;
End.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.