;!0L &G^f&GVF_^f]MQEUVW_^]M˸QEUVW_^]M˸QVW_^˸2B6(QCMMassen#4u4w4RealJukeboxoJBraketmassen som funktion af tiden@t (s)em (kg)00"Arial"Arial"Arial"Arialtm dN@A000Fij&AJc0k5Fjk&AJb0603kl'@J`05FlmJUV]05FBJV]b,l00e332Q 'BJj+l2Q !)CJj*l2Q!"2500003Jj)l2Q"#+D(l2Q #$-Dl2Q $%ldh?~G7 /L4 U;PQ Klar - Lkke;P1edt := 0.1 {s} t := 0 {s} x := 0 {m} v := 0 {m} g := 9.82 {kg/m^2} m1 := 30000 {raketmasse, trin 1} m2 := 20000 {raketmasse, trin 2} m3 := 10000 {raketmasse, trin 3} mb1 := 90000 {brndstofmasse, trin 1} mb2 := 30000 {brndstofmasse, trin 2} mb3 := 20000 {brndstofmasse, trin 3} mb := 0 {samlede forbrndt masse} m := m1+m2+m3+mb1+mb2+mb3 {samlede startmasse} u := 2500 {udstdningshastigheden af gassen, m/s} k1 := 5000 {masseudstdning/tid, trin 1, kg/s} k2 := 3000 {masseudstdning/tid, trin 2, kg/s} k3 := 2000 {masseudstdning/tid, trin 3, kg/s} k := k1 trin := 1m := m + (-k)*dt {m aftager linert} mb := mb + k*dt a := -u/m*(-k) -g {accelerationen afhnger af impulsbevarelsen og tyngden} v := a*dt + v x := v*dt + x t := t + dt if (mb>=mb1) and (trin=1) then m := m-m1 {afskyd raketmasse 1} k := k2 trin := 2 endif if (mb>=mb1+mb2) and (trin=2) then m:=m-m2 {afskyd raketmasse 2} k := k3 trin := 3 endif if (mb>=mb1+mb2+mb3) then stop UFartend`.LVCL.< ?BLfarten som funktion af tident (s)ev (m/s)"00"Arial"Arial"Arial"Arialtv N@@0008=x603wH=xw03w >xw(>x`w10000dh?~G Lݠ"HU4 U;P`"