已知s=1+2+3+...+n,找出最大的n,使得S
题目
已知s=1+2+3+...+n,找出最大的n,使得S
答案
Private Sub Command1_Click()
Dim s, n As Long
n = 1
Do While s < 30000
s = s + n
n = n + 1
Loop
Print (n)
End Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 如图,开口向上的抛物线y=ax²+2ax-c与x轴交于点A,B,与y轴交于点C,点A在x轴的正半轴,点B在x轴的负
- 两条电阻丝的电阻R1 >R2,它们通电后的电功率大小关系是( )
- 初三数学题二次函数最值方面
- 盒子里装着红花和黄花.红花的朵数是黄花的四分之三.如果取24朵红花填进十二朵黄花后.红花的朵数是黄花的五分之三.现在黄花有多少朵?
- Her father bought her a souvenir.(对a souvenir提问)
- 将微安表改装成欧姆表的电路图
- Na2O和MgO熔点高低如何啊?
- 60的五分之二相当于80的几分之几?列式计算:
- 开头是;路边有一棵大树,它站在哪儿很多年了,树皮在渐渐脱罗,它的身边,最近新载了几棵小树.的作文
- 函数f(x)=x+√(x+1)在区间(1,3)上值域是
热门考点