一道电脑算法题(用vb做)有一只蜗牛,每天白天能爬行60cm,他最初在井底,井深5m,他晚上会向下滑,滑落的距离为0-1之内的一个随机小数*100cm,输出用多少天他会爬到井口或失败

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/08 19:49:48

一道电脑算法题(用vb做)有一只蜗牛,每天白天能爬行60cm,他最初在井底,井深5m,他晚上会向下滑,滑落的距离为0-1之内的一个随机小数*100cm,输出用多少天他会爬到井口或失败
一道电脑算法题(用vb做)
有一只蜗牛,每天白天能爬行60cm,他最初在井底,井深5m,他晚上会向下滑,滑落的距离为0-1之内的一个随机小数*100cm,输出用多少天他会爬到井口或失败

一道电脑算法题(用vb做)有一只蜗牛,每天白天能爬行60cm,他最初在井底,井深5m,他晚上会向下滑,滑落的距离为0-1之内的一个随机小数*100cm,输出用多少天他会爬到井口或失败
Private Sub Command1_Click()
Dim x#, i%
Randomize Time
x = 60: i = 1
Do While x < 500
x = x - Rnd() * 100
If x < 0 Then x = 0 ': Exit Do'如果这样算失败!
x = x + 60: i = i + 1
Loop
Print x, i
End Sub

一道电脑算法题(用vb做)有一只蜗牛,每天白天能爬行60cm,他最初在井底,井深5m,他晚上会向下滑,滑落的距离为0-1之内的一个随机小数*100cm,输出用多少天他会爬到井口或失败 电脑VB这题怎样做 麻烦各位用算法原理,数学竞赛总共有10道题.每做对一道题得8分,小数学竞赛总共有10道题.每做对一道题得8分,小秀得了41分.她做对了几道题?(10×8-41)÷(8+5)=3故3道题是做错的对的题为 10-3= 一、单项选择题(每小题1分,共30分,必做)VB习题 求vb大神帮忙做一道题.要求;只需要要程序写出来,界面的截图;超长正整数的加法,请设计一个算法完成两个超长正整数的加法. VB题做一下 求一道VB题第一道选择题 VB编程用欧几里得算法求俩个正整数的最大公约数 有一道关于蜗牛爬墙的题:“日升六尺六,也降三尺三.墙高一丈九,几日到顶端.”蜗牛第( )天首次到顶端 一道vb题,适合采用循环结构算法的是A.判断一个证书是否为偶数 B.输入一个圆的半径,计算面积和周长C.输入10000个数值,计算平均数 D.输入一个正方形面积,求边长请每项具体分析! VB循环结构的一道题 星光小学去年有60台电脑,今年比去年增加百分之40,今年有多少台电脑 快还有小名参加数学竞赛,共10题,每多做一道得10分,每做错一道到扣5分,他最后得了55分,小明一共答对了几题,错了几题 用简便算法做 VB,MOD算法中的负数算法 求vb制作选择题代码我想用vb做4道选择题(每道题4个选项) 4道题总共一个确定按钮 2道单择题(比如都选第一项) 2道多选题(比如都选第一二两项)都选对的话按确定退出 否则哪道题错了 vb分别用子过程和子函数编写求两个数的最大公约数(算法用辗转相减法) 高中数学导数求导的流程图(算法),用C语言写也行,VB也行,伪代码也行 做第一道题的时候有一道说:算法执行后可以产生不同的结果,例如判断一个整数是否是偶数,结果为“是偶数”和“不是偶数”两种.可后来又有一道题说:算法是一步步执行,每一步都能得到