0 Members and 1 Guest are viewing this topic.
Define LibPub nsolver(eq,x)=Prgm:Local a,b,c:a:=−100:b:=nSolve(eq,x=−100):Disp "Solutions: ":Disp b:While a≤100: a:=a+1: c:=nSolve(eq,x=a): If b≠c Then: Disp c: b:=c: EndIf:EndWhile:EndPrgm
Define LibPub nsolver(eq,x)=Prgm:Local a,b,c:a:=−100:b:=nSolve(eq,x=−100):Disp "Solutions: ":Disp b:While a≤100: a:=a+1: c:=nSolve(eq,x=a): If round(b,5)≠round(c,5) Then: Disp c: b:=c: EndIf:EndWhile:EndPrgm
BTW, what means :=?
Isn't there also a =: command? I've only used the normal →, though (I'm too used to 83 syntax ).