If a 7kg object is thrown straight upwards at a speed of 10m/s(meters per second)
To what height will it rise?
note: gravitational constant = -9.8m/s
(In reply to
In vacuum or in air... by Charlie)
The numerical integration:
DEFDBL A-Z ' this version is for the larger object
CLS
pi = ATN(1) * 4
A = 1
V = 10
m = 7
p = 0
dt = .0001
DO
acc1 = -9.8
acc2 = -1.24 * A * V * ABS(V) / m
acc = acc1 + acc2
p = p + dt * (V + V + dt * acc) / 2
IF p > pMax THEN pMax = p
V = V + dt * acc
t = tPrev + dt
IF INT(t * 10) > INT(tPrev * 10) THEN
PRINT USING "##.## ##.###"; t; p
END IF
IF p < pMax AND fl = 0 THEN
PRINT USING "##.## ##.###"; tPrev; pMax
fl = 1
END IF
tPrev = t
LOOP UNTIL p <= 0
PRINT USING "##.## ##.###"; t; p
For the bowling ball, we set
A= pi * (1 / 10) ^ 2 due to its size
and
acc2 = -.62*A*V*ABS(V)/m due to its spherical nature.
|
Posted by Charlie
on 2003-04-01 09:20:25 |