题目
统计输出100至999内能被3整除且至少有一位是5的整数的个数 要VB代码 最好有流程图
Private Sub Command1_Click()
Dim i(100 To 999) As Integer
m = 0
i = 100
Do While i
Private Sub Command1_Click()
Dim i(100 To 999) As Integer
m = 0
i = 100
Do While i
提问时间:2021-01-03
答案
有些错误,改正如下:
Private Sub Command1_Click()
Dim i As Integer
m = 0
i = 100
Do While i
Private Sub Command1_Click()
Dim i As Integer
m = 0
i = 100
Do While i
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1完形 In my whole childhood I focused on training to play professional soccer
- 2用来形容雨声的古诗句
- 3谁能给我说一下弗洛伊德的本我,自我,超我之间的关系啊
- 4一英语语法选择题 What you said _______________ A. sounds good B.sounds well C.sounds like good
- 5假设你叫Wang Meng,初中生活即将结束,校园网的英语论坛开设了“Thank you letter ”专刊,按照要求写英语作
- 6即初速度是哪个,那时间呢?
- 7我们英语老师要我们翻译一句话:这就是我买的房子. This is the house where I bought.
- 8一 ()一() 的成语 括号反义词
- 9“Please let
- 10英语翻译
热门考点
- 1为什么氯化铝滴入氢氧化钠溶液中会出现白色沉淀后溶解的现象?
- 2物体怎么运动地转偏向力最大呢,是由北向南还是由南向北,还是由西向东?
- 3已知函数g(x)=ax²-2ax+1+b(a不等于0,b>1),在区间[2,3]上有最大值4,最小值1,设f(x)=g(x)/x,
- 4黄色加蓝色会变成什么颜色
- 5随风潜入夜 润物细无声 所含的哲理
- 6下列交通运输方式中,运输量最大、最经济的是A公路B航空C水运D铁路
- 7用curious in的用法吗
- 8三个数的平均数是24 ,这3个数的比是2比3比5,3个数各是多少?
- 9设a为质数,b,c为正整数,且满足9(2a+2b-c)的平方=509(4a+1022b-511c)且b-c=2,求a(b+c)的值
- 10have a such kind behaviour 和 have such a kind behaviour