Ошибка 215 - Turbo Pascal

Program lab6;
var
a:integer;
b,c: real;
begin
a:=2;
b:=0;
c:=a/(sqr(a)+5);
while c>=0.005 do
begin
a:=a+1;
c:=a/(sqr(a)+5);
b:=b+c;
end;
writeln('‘㬬* ап¤* -',b:4:6);
writeln('—«Ґ* ап¤* - ',c:4:6);
read(b);
end.