:ClrHome
:Menu(“SOLVE FOR”,”PRISM”,1,”
CONE”,2,”CYLINDER”,3,”Sphere”,4,
”ABOUT”,10,”QUIT”,11
:Lbl 1
:Input “L”,L
:Input “W”,W
:Input “H”,H
LxWxH→V
:GOTO 7
:Lbl 2
:Input “R”,R
:Input “H:,H
3.14xR2x(H/3)→V
:Goto 7
:Lbl 3
:Input “R”,R
:Input “H”,H
3.14xR2xH→V
:Goto 7
:Lbl 4
:Menu(“FULL OR HALF”,”FULL”,6,”HALF”,7
:Lbl 6
:Input “R”,R
((4/3)x3.14xR3)→V
:Goto 7
:Lbl 7
:Input “R”,R
(((4/3)x3.14xR3)/2)→V
:Goto 7
:Lbl 7
:Disp “Answer”,V
:Stop
:Lbl 10
:Output(3,2,”CALCULATOR V3.1”
:Output(4,3,”BY TANNER A.”
:Output(5,3,”VIST WIKIDOT”
:Pause “PRESS ENTER”
:Stop
:Lbl 11
:Stop
Volume Program for 3D Shapes
Summary:
Can calculate the volume of a sphere, cylinder, cone, prism/cube... Send me a message with you want me to add a shape