с информатикой.Пропишите решение из программы, как это решать это не в программе, а в ручную.

Программа:

program blablabla;

var

a: array[1..7] of real;

s: real;

i: integer;

begin

for i := 1 to 7 do

read(a[i]);

s := 0;

for i := 1 to 7 do

s := s + a[i];

writeln(s)

end.