1.输出100以内的素数。 提示: INPUT N X = INT (SQR (N)) FOR I=2 TO X R=N MOD I IF R=0 THEN F=1:EXIT FOR NEXT I IF F=1 THEN PRINT "NO" ELSE PRINT "YES" END 按照上面判断素数的程序,编一下第一题。 2.求M和N的最大公约数。 如果你有书,注意只许用循环语句前的所有语句。因为我后面的还没有学会呢!
cls dim m as long,n as long input m,n if n<m then swap m,n end if for i=m to 1 step -1 if m mod i=0 and n mod i=0 then print i exit for end if next i end 以上为程序源代码,SWAP 为交换数值的函数,因为要最大的所以要从较小数到着循环,EXIT FOR 为退出循环体的意思,MOD 为求余数的意思,如果不懂的话就这样: T=M M=N N=T