Question d'informatique (turbo pascal)

[elena.vi]

voila un programme d'informatique que je dois terminer mais je ne suis pas certaine de ma réponse


program ex2;
var N,k : integer;
epsilon,u : real;

begin
writeln("donner un réel strictement positif");
readln(epsilon);
N:=trunc (-ln (epsilon))+1;
u:=-1;
for k:=1 to N do .....
end.

montrer que l'entier naturel N calculé dans ce programme vérifier : (1/e)^Ncompleter la partie en pointillée de ce programme afin que la variable u contienne après son éxécution une valeur approchée de alpha (alpha est la solution a l'équation exp(x)-x=n) à epsilon près.

pour le programme j'ai fait ca:

program ex2;
var N,k : integer;
epsilon,u : real;

begin
writeln("donner un réel strictement positif");
readln(epsilon);
N:=trunc (-ln (epsilon))+1;
u:=-1;
for k:=1 to N do exp(u)-u;
end.