Question

vb编程 火车速度V=40KM/h 加速度a=0.15m/s 求2min后速度V和距开始点的距离S

vb编程 火车速度V=40KM/h 加速度a=0.15m/s 求2min后速度V和距开始点的距离S

Answer 1

Private Sub Command1_Click()
dim TS as integer,Tv0 integer, Tv1 as integer,Ta as integer,Tt as integer
TV0=40*1000/3600
Tt=2*60
'先化简，统一各单位 v=40KM/h=100/9 m/s ,a = 0.15 m/s, t=120 s
Tv1=Tv0+Ta*Tt '由公式v2=v1+at得
TS=Tv0*Tt+Ta*(Tt)^2/2 '由公式s=v0t+at^2/2得
text1.text=Tv1 '2min后速度V
text2.text=TS '距开始点的距离S
end sub

‘必要的话可以进行单位换算

Answer 2

开始点火车速度为（100/9）/(m/s). 2min后火车速度为（100/9）+（0.15*120)
s=（100/9）/(m/s)*60s+[{(100/9）+（0.15*120)}/2]*120 单位为m