11 lines
170 B
Text
11 lines
170 B
Text
|
#include "solver.bi"
|
||
|
|
|
||
|
|
Dim As String expression = "(x ^ 2 )-7"
|
||
|
|
|
||
|
|
setVar("x",1.2)
|
||
|
|
Print "one = ";Solver(expression)
|
||
|
|
setVar("x",3.4)
|
||
|
|
Print "two = ";Solver(expression)
|
||
|
|
|
||
|
|
Sleep
|