profile
Опубликовано 5 лет назад по предмету Информатика от artyom62

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

  1. Ответ
    Ответ дан archery
    var a:array[1..4] of integer;
    i, sum:integer;
    Begin
      for i := 1 to 4 do begin
         a[i]:= i*i;
         sum := sum + a[i];
         writeln(a[i]);
      end;
      writeln(sum);
    End.