10 lines
108 B
Text
10 lines
108 B
Text
SUB nswap (a, b)
|
|
temp = a: a = b: b = temp
|
|
END SUB
|
|
|
|
a = 1
|
|
b = 2
|
|
|
|
PRINT a, b
|
|
CALL nswap(a, b)
|
|
PRINT a, b
|