demo2.txt

Basic语言解释器.zip

Sub Main()
 print 
 J(40,1110,(999+1)*2)
End Sub

Sub J( Dim a As Integer,Dim b As Integer,Dim c As Integer)
 Print "a="
 Print a
 Print
 Print "b="
 Print b
 Print
 Print "c="
 Print c
 Print
 Print a+b+c
End Sub