自定义起始数和终数，输出之间所有的素数，初学者花了1节课的时间呵呵。
有一个不足：起始数必须大于3，终数随便，但不要太大，到了后面程序要执行很多计算，会很慢。代码：

Cls
Print " CALCULATE PRIME"
Print ""
Goto @first
@error1 print "Error ! a>=3 ! Please input again !"
@first Print "Please imput the first number:";
Input a
If a<3 then goto @error1
Goto @last
@error2 print "Error ! b>a ! Please input again !"
@last Print "Please imput the last number:";
Input b
If b<=a then goto @error2

Cls
Print ""
Print " Input right !"
Print "Calculatting... Please wait..."
Print ""
For i = a to b
p=0
j=2
While j<i
If i%j=0 then p=1
j=j+1
Wend
If p=0 then print " ";i;
Next
Print ""
Print ""
Print "Successful !"
End