prgmALG2

Menu("Solve for","Pressure",1,"Density",2,"Force",3,"Kinetic Energy",4,"Work",5,
Lbl 1
Menu("Solve for","Pressure",6,"Force",7,"Area",8
Lbl 6
Input "Force?",F
Input "Area?",A
Disp "Pressure:",F/A
Stop
Lbl 7
Input "Pressure?",P
Input "Area?",A
Disp "Force:",PA
Stop
Lbl 8
Input "Force?",F
Input "Pressure?",P
Disp "Area:",F/P
Stop
Lbl 2
Menu("Solve for","Density",9,"Mass",10,"Volume",11
Lbl 9
Input "Mass?",M
Input "Volume?",V
Disp "Density:" ,M*V
Stop
Lbl 10
Input "Mass?",M,
Input "Density?",D
Disp "Volume:"M/D
Stop
Lbl 11
Input "Density?",D
Input "Volume?",V
Disp "Mass:" ,D*V
Stop
Lbl 3
Menu("Solve for","Force",12,"Mass",13,"Acceleration",14
Lbl 12
Input "Mass?",M
Input "Acceleration?",A
Disp "Force:",M*A
Stop
Lbl 13
Input "Force?",F
Input "Acceleration?",A
Disp "Mass:",F/A
Stop
Lbl 14
Input "Force?",F
Input "Mass?",M
Disp "Acceleration:",F/M
Stop
Lbl 4
Menu("Solve for","Kinetic Energy",15,"Mass",16,"Velocity",17
Lbl 15
Input "Mass?",M
Input "Velocity?",V
Disp "Kinetic Energy:",(M*V^2)/2
Stop
Lbl 16
Input "Kinetic Energy?",E
Input "Velocity?",V
Disp "Mass:",2M/V^2
Stop
Lbl 17
Input "Mass?",M
Input "Kinetic Energy?",E
Disp "Velocity:",2K/M
Stop
Lbl 5
Menu("Solve for","Work",18,"Force",19,"Distance",20
Lbl 18
Input "Force?",F
Input "Distance?",D
Disp "Work:",F*D
Stop
Lbl 19
Input "Work?",W
Input "Distance?",D
Disp "Force:",W/D
Stop
Lbl 20
Input "Force?",F
Input "Work?",W
Disp "Distance:",W/F
Stop