esercitazioni con Turbo Basic

esci turboba.htm

grafici vari

REM grafo6x
SCREEN 2
LINE (0, 200)-(300, 200)
LINE (80, 1)-(80, 300)
FOR k = 0 TO 300 STEP 10
LINE (k, 198)-(k, 202)
NEXT k
a = 0
FOR x = -8 TO 8 STEP .1
y = x ^ 3 - 4 * x - 3
LINE (a, 200 - y)-(a, 200 - y)
a = a + 1
NEXT x
r = 2
FOR x = -5 TO 5 STEP 1
LOCATE r, 30
PRINT x, x ^ 3 - 4 * x - 3
r = r + 1
NEXT x
LOCATE 20, 2
PRINT "y=x^3-4x-3..si annulla per x=-1 ..altra radice tra 2,3 "
END