Alors voila je suis en train d'essayer de mettre l'algorithme de l’exercice 2 du sujet bac s 2016 d'Amérique du nord sur ma TI Nspire CX CAS, C'est le premier programme que je tape et je galere un peu

![[ctrl] :nsct:](./images/smilies/nspire/ns_ct.png)
![[B_] :nsb:](./images/smilies/nspire/nsb.png)
Merci d'avance,
Florian.
Define algo1()=
Prgm
:Local a:=2
:Local b:=2*exp(1)
:While (5*(((b^(2))/(2))ln(((b)/(2)))-2*b*ln(((b)/(2)))-((b^(2))/(4))+2*b-3))-(5*(((a^(2))/(2))*ln(((a)/(2)))-2*a*ln(((a)/(2)))-((a^(2))/(4))+2*a-3))>10^(−3)
:Local c:=((a+b)/(2))
:if (5*(((c^(2))/(2))*ln(((c)/(2)))-2*c*ln(((c)/(2)))-((c^(2))/(4))+2*c-3))<((22)/(2))
:Then Local a:=c
:Else Local b:=c
:EndIf
:EndWhile
:Disp c*ln(c/2)-c+2
:EndPrgm
Local a:=2
Local b:=2*e
Local a,b
a:=2
b:=2*e
Local
suivi de toute tes variables, comme vient de le rappeler critorLocal a,b,c © etc...
If condition Then
instruction
Else
instruction
EndIf
Define algo1()=
Prgm
:Local a,b,c
:a:=2
:b:=2*
:While (5*(((b^(2))/(2))ln(((b)/(2)))-2*b*ln(((b)/(2)))-((b^(2))/(4))+2*b-3))-(5*(((a^(2))/(2))*ln(((a)/(2)))-2*a*ln(((a)/(2)))-((a^(2))/(4))+2*a-3))>10^(−3)
:c:=((a+b)/(2))
:if (5*(((c^(2))/(2))*ln(((c)/(2)))-2*c*ln(((c)/(2)))-((c^(2))/(4))+2*c-3))<((22)/(2)) Then
:a:=c
:Else b:=c
:EndIf
:EndWhile
:Disp c*ln(((c)/(2)))-c+2
:EndPrgm
Users browsing this forum: ClaudeBot [spider] and 5 guests