vb 请用do .loop while 求满足1+2+3+4+…+n>20最小的n值.输出n.
题目
vb 请用do .loop while 求满足1+2+3+4+…+n>20最小的n值.输出n.
答案
Private Sub Command1_Click()
Dim n, s
n = 0
s = 0
Do
n = n + 1
s = s + n
Loop While s
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 恒星、行星与卫星的区别
- 设z=x+iy,则1/z的实部是不是x/(x^2+y^)?
- 济南的冬天里的薄雪的薄怎么读
- The girl is dressing _.she is going to the party.的中文?横线上?为甚麽?
- 为什么不能用氯气做喷泉实验
- Mum‘s cooked the dinner.改为一般疑问句,Has mum cooked the dinner?这是为什么呢?"‘s"是啥
- 某油田有甲、乙两队,甲队有工人108名,乙队有工人76名.现根据需要添加80名新工人,是甲队人数为乙队人数的
- 7分之4表示把单位1平均分成7份,取其中的4份.还表示把4平均分成（）份,取其中的（）份.
- 在平面直角坐标系中,点P(x,y)为动点,已知点A(根号2,0),B(负根号2,0),
- 关于分数除法的一道数学题!
热门考点
- 求经过直线x+3y+7=0与3x-2y-12=0的交点,圆心为c(2,-2)的圆的方程
- 一台设备由三大部件组成,三部件相互独立,需要调整的概率均为0.2,以X表示同时调整的部件数,求X的期望和方差
- 我不想失去你这个好朋友... 英语怎么说?
- 分数除以整数怎么算
- 卡车以20m/s的速度沿平直的公路匀速行驶,卡车后面800米处有一辆小汽车从静止启动追赶卡车.小汽车最大允许行驶速度为40m/s,设小汽车在加速阶段做匀加速运动,要使小汽车在启动后2min内能追上卡车
- 《沁园春 雪》中数风流人物,还看今朝 的作用是什么?
- 根据英文解释及首字母在括号内给出完整单词
- Fill in the gap:The emeny( )struggling to control the town.应填?细说说
- 四十八分之四十七乘39
- she did that so that kylie could a( ) problems with her parents.首字母填空