我在使用"BOOLEAN真和假的用法"的时候也发现了一些简便方法。下面举几个例子。

例1：输出一个数除以2的商的四舍五入值（不许用CINT函数）。

一般方法：
s=n/2
IF s<>INT(s) THEN PRINT s+0.5 ELSE PRINT s
简便方法：
s=n/2
s=s+ABS(s<>INT(s))*0.5:PRINT s
例2：数组a共有10个元素，分别是a(1)到a(10)，假设a(10)的后继元素是a(1)，输入n(1<=n<=10)，输出a(n)的后继元素是第几个元素。

一般方法：
INPUT n
s=n+1
IF s>10 THEN s=1
PRINT s
简便方法：
INPUT n
s=n+1+(n=10)*10                          '加上-10就等于减去10
PRINT s

例3：输出两个一位数m和n的和的个位。

一般解法：
INPUT m,n
s=m+n
PRINT s MOD 10
简便解法：
INPUT m,n
PRINT m+n+((m+n>10)*10)                             '同样，加上-10就等于减去10

你那些什么程序。。。。不给分。。
践踏PRG的BASIC。。。