'生成三位正整数,它能被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
'生成三位正整数,它能被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
最新问答: 英语翻译:不要让阳光伤害你的眼睛.( )your eyes ( )the sun.(每空不一定要一词)急! 甲乙丙丁四个数的和等于32,甲加上17,乙减去11,丙加上23,丁减去15,得到四个新数,那么这四个新数的和是多少? 同时满足X/3>2X+2/5和1-(X+1)/2〈0的取值范围是 我不知道你爱我 作文 选词写作文.用大树 河流 斧子 露珠写一篇约400字的想象作文.(答出给Q币)帮忙找. 在等差数列﹛an﹜中a1=60.a17=12,求数列﹛│an│﹜的前N项和 我们中十个人将去游泳,其余的将在沙滩上打排球 英语怎么说 关于分子的热运动,下列说法中正确的是( ) A.当温度升高时,物体内每一个分子热运动的速率一定都增大 B.当温度降低时 已知x=9/8,求 √3/x+√x/3+√(x2+9)/(3x+2)+√(x2+9)/(3x-2)的值 万能英语开头句 愚公精神中到底有没有脚踏实地?确切的愚公精神是什么? 写一篇描写小时候的一张照片的英语小作文小学水平就可以了 依恋的近义词快 If you get the job y 求教:Excel里相关系数函数 CORREL()与利用COVAR()、STDEV()求得的相关系数不同 在做(物质在成有氧气的集气瓶中燃烧的实验)时.通常要在集气瓶中加少许水.能否用细沙代替水? 救命!表现生命之韧的四字词 乙二醇氧化反应生成草酸的条件是什么? 词语、成语接龙70个以上(词语、成语都行)从快乐开始 某人骑车从学校到书城,行了全程的百分之十五时,距离两地间的中点还有1/2千米。学校到书城相距多少千米?