求教一下QBasic的问题，数学必修3里面的

来源：百度知道 编辑：UC知道 时间：2024/06/18 15:47:50
输出1000以内的能被21整除的所有正整数和正整数的个数。
这个程序怎么编写呢？？？
求教～～
还有别的答案吗？？？
还有求这样的整数的个数啊～～

for n=21 to 1000 step 21
n=n+21
m=m+1
next
n=
m=
主要算法就是这样,具体语句自己写吧

i=1
S=0
DO
S=S+1
i=i+1
LOOP UNTIL i>1000
PRINT S
END

CLS
FOR I=1 TO 1000
IF I MOD 21=0 THEN PRINT I,:S=S+1
NEXT I
PRINT S
END