作业帮 > 综合 > 作业

VFP编程找出1-1000范围内能被7或9整除的数,按每行10个数的形式输出这些数.

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/21 13:01:30
VFP编程找出1-1000范围内能被7或9整除的数,按每行10个数的形式输出这些数.
Clear
Set Talk On
k = 0
For i = 1 To 1000
\x05If i % 7 ==0 Or i % 9 == 0
\x05\x05k = k + 1
\x05\x05?Str(i,5)
\x05\x05If k % 10 == 0
\x05\x05\x05?
\x05\x05Endif
\x05Endif
Next