编程:生成三位正整数,它能被7整除,且十位数等于5

怪精灵古 1年前 已收到1个回答 举报

kmtyrydty 幼苗

共回答了15个问题采纳率:93.3% 举报

'生成三位正整数,它能被7整除,且十位数等于5
For i = 100 To 999
If i Mod 7 = 0 And Mid(Trim(Str(i)),2,1) = "5" Then Debug.Print (i)
Next
----
即时打印结果:
154
252
259
350
357
455
553
651
658
756
854
952
959

1年前

6
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 1.511 s. - webmaster@yulucn.com