当s(i)小于s(j)时,交换两者的值.
在QBASIC中有一个SWAP函数具备Then之后的那部分功能.
如果不考虑算术溢出的话,可以写成:
If s(i) < s(j) Then s(i)=s(i)+s(j):s(j)=s(i)-s(j): s(i)=s(i)-s(j)
