Files
tsvm/assets/disk0/home/basic/dotest.bas
2020-12-24 11:14:11 +09:00

4 lines
104 B
QBasic

10 DEFUN KA(X)=IF X>2 THEN DO(PRINT("HAI");PRINT(X)) ELSE DO(PRINT("BYE");PRINT(X))
20 INPUT N
30 KA(N)