
高二数学 找出1至1000内7的倍数的一个算法
3个回答
展开全部
在EXCEL中运用宏编辑器编辑如下宏,然后运行
Sub qb()
m = 1
For i = 7 To 1000 Step 7
Sheet1.Cells(m, 1).Value = i
m = m + 1
Next
End Sub
Sub qb()
m = 1
For i = 7 To 1000 Step 7
Sheet1.Cells(m, 1).Value = i
m = m + 1
Next
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询