esercitazioni con Turbo Basic

esci turboba.htm

grafici vari

REM grafo7x
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 + 10
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 + 10
r = r + 1
NEXT x
LOCATE 20, 2
PRINT "y=x^3-4x+10..si annulla per x tra -3 e -2 "
END