REM alge32x
REM uso di funzioni con DEF FN
CLS

DEF fnqua (dato) = dato * dato: n = 5: PRINT n, fnqua(n)
DEF fntri (dato) = dato * dato * dato: n = 4: PRINT n, fntri(n)
PRINT "---------------------------------------------------------"
PRINT "attivazione funzioni quadrato e cubo di numeri"
PRINT "n", "fnqua", "fntri"
PRINT
FOR n = 1 TO 5
 PRINT n, fnqua(n), fntri(n)
NEXT n
END
 5             25
 4             64
---------------------------------------------------------
attivazione funzioni quadrato e cubo di numeri
n             fnqua         fntri

 1             1             1
 2             4             8
 3             9             27
 4             16            64
 5             25            125


ritorna