题目
编写程序,求在3000以内能被17或者23整除的正整数的个数
提问时间：2020-10-12
答案
Private Sub Command1_Click()
Dim i As Integer,n As Integer
For i = 1 To 3000
If i Mod 17 = 0 Or i Mod 23 = 0 Then _
n = n + 1
Next
Print n
End Sub
Dim i As Integer,n As Integer
For i = 1 To 3000
If i Mod 17 = 0 Or i Mod 23 = 0 Then _
n = n + 1
Next
Print n
End Sub
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1"阿房宫"中的“阿房”怎么读音?是a fang 还是 e pang?
- 2一：解释古诗中加括号的字词.
- 31吨等于多少立方米
- 4对诸葛亮 精神品质“鞠躬尽瘁死而后已”的理解
- 5谁知道这段英文的具体意思?
- 6小平和小亮住在同一幢大楼里，小平住五楼，小亮住四楼，小平每天回家要走80级台阶，小亮回家要走多少级台阶？
- 7she is going to write a poem on National Day中的write a poem 进行提问
- 8已知向量a=(sinx,cosx),b=(1,-2),且a⊥b,则tan2x=
- 9酸性KMnO4与SO2
- 10要配制100g质量分数为5%的氢氧化钠溶液，下列说法正确的是（ ） A.实验中要用到的玻璃仪器只有烧杯和玻璃棒 B.称量氢氧化钠固体时应该将砝码放在左盘，药品放在右盘 C.配制好的氢氧
热门考点
- 1dinner 同义词
- 2原来都是静止的质子和α粒子，经过同一电压的加速电场后，它们的速度大小之比为（ ） A.2：2 B.1：2 C.2：1 D.1：1
- 3已知f(x)=x/sinx-1 ,当 x→（ )时,f(x)为无穷小量.
- 4如图，四边形ABCD是长方形，以BC为直径的半圆与AD边相切，且AB=2，则阴影部分的面积为_．
- 5列历史事件的时间顺序是……
- 6一个直角三角形玻璃,两边相等,都是40厘米,没分米卖6元,买这块玻璃要多少钱?
- 7夫不能以游堕事的意思夫的意思
- 8甲、乙两数的和是26，甲数是乙数的2倍，甲数是_，乙数是_．
- 9等腰三角形一腰上的高是腰长的一半,则这个等腰三角形的底角是（ ）度
- 10请帮忙翻译(英译中):They travel to work in the city.