Figure Optimization making it more efficient, faster, smaller

Introduction: AA Math Optimization: (TI Basic Optimization) - In the field of TI calculator programming, optimization refers to improving code to use less memory, or to run faster.
Figures This program Figures was written by [Kurt Ostrom] and modified by (navyfalcon) e-mail
Rectangular Prism: Calculate height, length, width, surface area, volume or diagonal for a rectangular prism
Volume and Surface of some Common Solids: Surface and volume of solids like rectangular prism, cylinder, pyramid, cone and sphere - online calculator
Space Diagonal: In a rectangular prism, a space diagonal is a line that goes from a vertex of the prism, through the center of the prism to the opposite vertex.
Rectangular Prism Problem: A set of interesting math problems which have simple and elegant solutions or proofs - a great resource for high school math classes and independent study!
Geometric Shapes in Solid Geometry
Shape diagrams and formulas for geometric solids including capsule, cone, conical frustum, cube, cylinder, hemisphere, pyramid, rectangular prism, sphere.: Optimization - TI-Basic Developer
: Calculus Using the TI-83 Plus / TI-84 Plus Online Course
: Guide for TI-83
: TI-84+/SE BASIC Math Programs

Line	Command or Statement	Comments
1.	ClrHome
2.	Lbl A
3.	ClrHome
4.	Menu("FIGURE-","2D",B,"3D",C,"EXIT",Z)	Menu
5.	ClrHome
6.	Lbl B
7.	Menu("FIGURE-","SQUARE",D,"RECTANGLE",E,"CIRCLE",F, "TRIANGLE",G)	Menu
8.	ClrHome
9.	Lbl D
10.	Menu("FIGURE-","PERIMETER",H,"AREA",I, "DIAGONAL",BB)	Menu
11.	ClrHome
12.	Lbl H	Square
13.	Disp "SQUARE- P.
14.	Input "S?",S
15.	S*4->A
16.	Disp A
17.	Pause
18.	Goto A
19.	Lbl I	Square
20.	Disp "SQUARE- A."
21.	Input "S?",S
22.	S^2->A
23.	Disp A
24.	Pause
25.	Goto A
26.	Lbl BB	Square
27.	Disp "SQUARE- D.
28.	Input "S?",S
29.	sqrt((S²)+(S⊃))->A
30.	Disp A
31.	Pause
32.	Goto A
33.	Lbl E	Rectangle
34.	Menu("FIGURE-","PERIMETER",J,"AREA",K, "DIAGONAL",BC)	Menu
35.	ClrHome
36.	Lbl J
37.	Disp "RECT.- P."
38.	Input "L?",L
39.	Input "W?",W
40.	(2L)+(2W)->A
41.	Disp A
42.	Pause
43.	Goto A
44.	Lbl K	Rectangle
45.	Disp "RECT.- A."
46.	Input "L?",L
47.	Input "W?",W
48.	L*W->A
49.	Disp A
50.	Pause
51.	Goto A
52.	Lbl BC	Rectangle
53.	Disp "RECT.- D."
54.	Input "L?",L
55.	Input "W?",W
56.	sqrt((L²)+(W⊃))->A
57.	Disp A
58.	Pause
59.	Goto A
60.	Lbl F
61.	Menu("FIGURE","CIRCUMFRANE",L,"AREA",M)	Menu
62.	ClrHome
63.	Lbl L	Circle
64.	Disp "CIRCLE- C."
65.	Input "R?",R
66.	(2R)π->A
67.	Disp A
68.	Pause
69.	Goto A
70.	Lbl M	Circle
71.	Disp "CIRCLE- A."
72.	Input "R?",R
73.	(R²)*π->A
74.	Disp A
75.	Pause
76.	Goto A
77.	Lbl G	Triangle
78.	Menu("FIGURE-","PERIMETER",N,"AREA",O)	Menu
79.	ClrHome
80.	Lbl N	Triangle
81.	Disp "TRIANGLE- P."
82.	Input "S?",B
83.	Input "S?",C
84.	Input "S?",D
85.	B+C+D->A
86.	Disp A
87.	Pause
88.	Goto A
89.	Lbl O	Triangle
90.	Disp "TRIANGLE- A."
91.	Input "B?",B
92.	Input "H?",H
93.	.5(BH)->A
94.	Disp A
95.	Pause
96.	Goto A
97.	Lbl C
98.	Menu("FIGURE-","BOX",P,"CYLINDER",Q,"SPHERE",R,"CONE",S, "PYRAMID",T,"DOUGHNUT",U,"PRISM",V)	Menu
99.	ClrHome
100.	Lbl P
101.	Menu("FIGURE-","VOLUME",AA,"SURFACE AREA",AB)
102.	ClrHome
103.	Lbl AA
104.	Disp "BOX- V."	Box
105.	Input "L?",L
106.	Input "W?",W
107.	Input "H?",H
108.	LWH->A
109.	Disp A
110.	Pause
111.	Goto A
112.	Lbl AB	Box
113.	Disp "BOX- S."
114.	Input "L?",L
115.	Input "W?",W
116.	Input "H?",H
117.	2(LW+WH+LH)->A
118.	Disp A
119.	Pause
120.	Goto A
121.	Lbl Q
122.	Menu("FIGURE-","VOLUME",AC,"SURFACE AREA",AD)	Menu
123.	ClrHome
124.	Lbl AC	Cylinder
125.	Disp "CYLINDER- V."
126.	Input "R?",R
127.	Input "H?",H
128.	((R²)π)H->A
129.	Disp A
130.	Pause
131.	Goto A
132.	Lbl AD	Cylinder
133.	Disp "CYLINDER- S."
134.	Input "R?",R
135.	Input "H?",H
136.	2πR*(R+H)->A
137.	Disp A
138.	Pause
139.	Goto A
140.	Lbl R
141.	Menu("FIGURE-","VOLUME",AE,"SURFACE AREA",AF)
142.	ClrHome
143.	Lbl AE	Sphere
144.	Disp "SPHERE- V."
145.	Input "R?",R
146.	1.3333333333333333333333333333333333333333333333333333π(R³)->A
147.	Disp A
148.	Pause
149.	Goto A
150.	Lbl AF	Sphere
151.	Disp "SPHERE- S."
152.	Input "R?",R
153.	4π(R²)->A
154.	Disp A
155.	Pause
156.	Goto A
157.	Lbl S
158.	Menu("FIGURE-","VOLUME",AG,"SURFACE AREA",AH)	Menu
159.	ClrHome
160.	Lbl AG	Cone
161.	Disp "CONE- V."
162.	Input "R?",R
163.	Input "H?",H
164.	(π(R²)H)/3->A
165.	Disp A
166.	Pause
167.	Goto A
168.	Lbl AH	Cone
169.	Disp "CONE- S."
170.	Input "R?",R
171.	Input "L?",L
172.	πR(R+L)->A
173.	Disp A
174.	Pause
175.	Goto A
176.	Lbl T	Pyramid
177.	Disp "PYRAMID(4)- V."
178.	Input "S?",S
179.	Input "H?",H
180.	((S²)*H)/3->A
181.	Disp A
182.	Pause
183.	Goto A
184.	Lbl U
185.	Menu("FIGURE-","VOLUME",AI,"SURFACE AREA",AJ)	Menu
186.	ClrHome
187.	Lbl AI	Doughnut
188.	Disp "DOUGHNUT- V."
189.	Input "LITTLE R?",R
190.	Input "BIG R?",L
191.	2(π²)L(R²)->A
192.	Disp A
193.	Pause
194.	Goto A
195.	Lbl AJ	Doughnut
196.	Disp "DOUGHNUT- S."
197.	Input "LITTLE R?",R
198.	Input "BIG R?",L
199.	4(π²)LR->A
200.	Disp A
201.	Pause
202.	Goto A
203.	Lbl V	Prism
204.	Disp "PRISM- V."
205.	Input "B?",B
206.	Input "TRIANGLE H?",T
207.	Input "PRISM H?",H
208.	(.5(BT))*H->A
209.	Disp A
210.	Pause
211.	Goto A
212.	Lbl Z
213.	ClrHome