esercitazioni con Turbo Basic

esci turboba.htm

grafici vari

REM grafo4
SCREEN 2
LINE (1, 100)-(300, 100)
LINE (90, 1)-(90, 200)
FOR k = 10 TO 200 STEP 10
LINE (k, 100)-(k, 102)
NEXT k
a = 10
FOR x = -8 TO 8 STEP .1
y = x ^ 2 + 4 * x
LINE (a, 100 - y)-(a, 100 - y)
a = a + 1
NEXT x
FOR x = -5 TO 1 STEP 1
PRINT x, x ^ 2 + 4 * x
NEXT x
END