:ClrHome
:Disp "F?"
:Input F
:Disp "Q1?"
:Input Q
:Disp "Q2?"
:Input R
:Disp "D?"
:Input D
:
:9*10^9[STO]K
:
:If F=X
:Goto A
:If Q=X
:Goto B
:If R=X
:Goto C
:If D=X
:Goto D
:
:Lbl A
:((K*Q*R)/D)[STO]F
:Disp F,"NEWTONS"
:Stop
:
:Lbl B
:(F*D)/(K*R)[STO]Q
:Disp Q,"COULOMBS"
:Stop
:
:Lbl C
:(F*D)/(K*Q)[STO]R
:Disp R,"COULOMBS"
:Stop
:
:Lbl D
:(K*Q*R)/F[STO]D
:Disp D,"METERS"
:Stop
Welcome!
Hey, my name is George. Im a junior in Highshool. Too often, I find myself sitting in class with spare time, so I write programs. Here you'll find all sorts of different programs written on TI BASIC, all for free and for you to use. Need help in physics? Try some of my physics programs. Math? No problem, got those too. Maybe you're even a little bored and want to play some games, well those are here too! They are all thought of and coded by me. Any questions or comments, feel free to email me!
All donations are appreciated! (And go to college savings!)
Thanks!
All donations are appreciated! (And go to college savings!)
Thanks!
0 comments:
Post a Comment