用VB编写一个球从100米高处自由落下,每次着地后又跳回原来高度的一半再落下,第10次反弹的高度是多少

streetvendor 1年前 已收到1个回答 举报

linpkds 幼苗

共回答了17个问题采纳率:100% 举报

Private Sub Command1_Click()
h = 100
n = 0
Do
h = h / 2
n = n + 1
Loop While n < 10
MsgBox h
End Su

1年前

4
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 17 q. 0.016 s. - webmaster@yulucn.com