Forum TI-Planet.org

It keep giving me an error...

Code: Select all

Define LibPub bin_desc(a,b,c)=
Prgm
© Equação do 2ºGrau
Local d,r1,r2,r
d:=b^(2)-4*a*c
If d>o Then
  r1:=((−b-√(d))/(2*a))
  r2:=((−b+√(d))/(2*a))
  Disp "O binómio Descriminante é d = ",d
  Disp "O primeiro solução é ",r1
  Disp "O segundo solução é ",r2
ElseIf d=o Then
  r:=((−b)/(2*a))
  Disp "O binómio Descriminante é = ",d
  Disp "A solução é r = ",r
ElseIf d<0 Then
  Disp "O binómio Descriminante é d = ",d
  Disp "Não há soluções."
EndIf
EndPrgm

In the calculator, I put: bin_desc(1,2,1)
answer: "Error:Indefined Variable"

Who can help me?

You wrote "d>o" with letter "o" instead of number "0" and the same for "d=o".
Curiously, you write correctly for "d<0".

Oh my god, i can't believe that was the error xD
Thanks, i will have more attention next time
Yap, that's curiously xD