（三） 随机出10道100以内的整数加减法算数题
clear
ts=1
do whie ts<=10
czf=iif(rand()>0.5,"+","-")
num1=rand()*100
num2=rand()*100
if =czf="+"
if num1+num2>100
loop
else
if num1<num2
loop
endif
endif
?"("+str (ts,2)+")"+” “+str (num1,2)+czf+str(num2,2)+"=”
ts=ts+1
enddo
（四） 计算1，1/2，1/3...1/n之和,当<0.001时停止
set decimal +0 2
n=1
nsum=0
do while .t.
if 1/n <0.001
exit
endif
nsum=nsum+2
n=n+1
enddo
wait windows "该系统之和为"+
[NextPage]
（五） 计算生肖自定义函数sx()