По программе определить тип алгоритма: а program test var N: integer S,A: real begi S:=0 for N:=1 to 5 d begi A:=1/N S:=S+A*A end writeln(S:6:4) readln end
б) program operation var a,b,c,d: real begi read(a) read(b) c:=a*b d:=a/b writeln(‘a*b=’,c) writeln(‘a/b=’,d) end.
а) циклический
б) линейный