mobilebasic/Examples/Core/function.bas

7 lines
No EOL
114 B
QBasic

FUNCTION SUM(X AS INTEGER, Y AS INTEGER) AS INTEGER
SUM = X + Y
END FUNCTION
SUB MAIN
PRINT SUM(5, 7)
END SUB