Решите пожалуйста номер 5,Паскаль 7 класс

Решение задачи в файле

uses crt;var i,n,k:integer;    s,a,st:real;beginclrscr;writeln('введите кличество слагаемых');readln(n);s:=86;i:=2;k:=1;st:=4;while i<=2*n do begin  a:=(i-3)/(st);  s:=s+a;  n:=n+2;  k:=k+1;  st:=4*st end; writeln('S=',s);end.