voisi mes fonctiosn :
Code : Tout sélectionner
syr(u):={
si u%2=0%2 alors u:=u/2;
sinon u:=3*u+1;
fsi;
return u;
}
Code : Tout sélectionner
temps_vol(u):={
local n:=1;
tantque syr(u)!=1 faire
u:=syr(u);
n:=n+1;
ftantque;
return(n);
}
Code : Tout sélectionner
altitude_syr(u):={
local alt:=syr(u);
tantque u!=1 faire
u:=syr(u);
si u>alt alors alt:=u;
ftantque;
return(alt);
}
Code : Tout sélectionner
Syntax compatibility mode xcas
Parse error line 9 at end of input
Sans doute une question de débutant .. Désolé pour le dérangement.
Maurice