RosettaCodeData/Task/Function-definition/Commodore-BASIC/function-definition.basic

4 lines
112 B
Plaintext

10 DEF FN MULT(X) = X*Y
20 Y = 4 : REM VALUE OF SECOND ARGUMENT MUST BE ASSIGNED SEPARATELY
30 PRINT FN MULT(3)