Free Turbo Pascal : compilation aborted.

Fermé
THX - 30 déc. 2010 à 11:27
Bonjour,
voilà je suis sur un exercice de Turbo Pascal, tout content de moi je pense avoir trouvé comment faire, je tape donc le programme et puis il ne veut pas tourner,
"Fatal: Compilation aborted", et ce sans donner aucune autre explication.
Je vous poste mon programme, merci d'avance pour votre aide.

Program ex7;
Var n:integer; u,v,w,P:real;
Begin write ('P>0?');read (P);
n:=0;u:=1;v:=2;
While abs(u-v)>P do
Begin n:=n+1;
w:=u;
u:=w/(n+1)-v/sqr(n+1);
v:=(w+v)/(n+1);
End;
Write(n);
End.
A voir également: