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