Восстановить словесно-формульный алгоритм или блок схему по готовой программе. определить цель программыю
1)var a, n, i : integer;
f: real;
begin
write (‘n=’); readln(n); write(‘a=’); readln(a);
f: =a;
for i: =1 to n do f: =a+sqr(f);
write(‘f=’,f);
end.
2)var s: longint;
i: integer;
begin
s: =0
for i: =25 to 125 do
s: =s+(i*i*i);
writeln(s);
end.