RosettaCodeData/Task/Include-a-file/Applesoft-BASIC/include-a-file-1.applesoft

6 lines
84 B
Text
Raw Permalink Normal View History

2013-10-27 22:24:23 +00:00
10 REMPROGRAM TWO
20 DEF FN A(X) = X * Y
30 PRINT FN A(2)
SAVE PROGRAM TWO