10 REM DEF FN test
20 DEF FN SQ(X) = X * X
30 DEF FN CU(X) = X * X * X
40 PRINT "5 squared ="; FN SQ(5)
50 PRINT "3 cubed ="; FN CU(3)
60 PRINT "Sum ="; FN SQ(3) + FN CU(2)