题目
用VB编写输入数据范围,随机产生3个指定范围内的随机整数,求三个整数平方根之和,保留小数点后4位
结果在picture中显示
结果在picture中显示
提问时间:2020-10-14
答案
Private Sub Command1_Click()
a = InputBox("输入随机数的下界")
b = InputBox("输入随机数的上界")
For i = 1 To 3
Randomize
c = Int(Rnd * (b - a + 1) + a)
Picture1.Print c
m = m + Sqr(c)
Next
Picture1.Print Format(m, "0.0000")
End Sub
a = InputBox("输入随机数的下界")
b = InputBox("输入随机数的上界")
For i = 1 To 3
Randomize
c = Int(Rnd * (b - a + 1) + a)
Picture1.Print c
m = m + Sqr(c)
Next
Picture1.Print Format(m, "0.0000")
End Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1一辆汽车以2m/s2的加速度做从静止开始匀加速直线行驶,这时一辆自行车以8米/s的速度经过,经过时立刻以2m/s匀减速直线运动,求1.汽车从开始运动后,在追上自行车之前在经过多长时间距离最远,此时距离
- 2甲乙两个导体电阻之比是1:4,将它们分别接到同一电源两端,通过它们的电流强度是( ) A.通过导体甲的电流较大 B.通过导体乙的电流较大 C.一样大 D.无法判断
- 3一个数除以三余二,除以四余三,除以五余四,这个数最小是()
- 4一个圆柱形粮囤,底面直径为2m,装满稻谷后,又在囤上最大限度的堆成一个1.2m高的圆锥.每立方米稻谷重700千克,这囤稻谷一共有多少千克?
- 5有先后的,成语哪些.类似争先恐后的
- 6列夫.托尔斯泰写过哪两篇文章?
- 7甲乙两人相距100米,甲在前,乙在后,同向而行,甲的速度是a米每秒,乙的速度是b米每秒,何时乙能追上甲?
- 8张海迪的人生道路给了我们哪些启示?“向张海迪学习”如何落实在我们的实际行动
- 91.我们本应该在车站见面的,但他没去.(汉译英) 2.他说他和同学们相处得好.(汉译英)
- 10I think this is the oldest coin ___ I have ever seen.A.which B.who C.what D.that
热门考点
- 1in consultation
- 2《蝈蝈与蛐蛐》1、“大地的诗歌”在诗中比喻什么?“不会死亡”的意思是什么?
- 3若x=1,y=2,z=3,则表达式z+=++x+y++值,
- 4how ,you ,is,teacher(?)连词成句
- 5臣与将军戮力而攻秦,将军战河北,臣战河南 翻译为现代汉语
- 6如何分析孟德尔遗传实验的科学方法
- 7精卫填海 文言文阅读
- 8某一件事件发生机会是99.99%,则这个事件是_事件,发生机会是1的事件是_事件.
- 9在光线明亮的实验室里,用白色洋葱表皮做质壁分离实验,在显微镜视野中能清晰地看到细胞壁,但不易看清楚细胞是否发生了质壁分离,为了便于判明,此时应(D)
- 1036*72,在竖式计算2*3=6时,6在竖式中表示有( )个 ( )