**TI-84 Plus CE and Sharp EL-9600c: Composite Area**

The
program COMPAREA will compile a composite area made of the following geometric
shapes:

*
Right Triangle: base and height known

*
General Triangle: side lengths known

*
Rectangle: side lengths known

*
Square: length of side known

*
Ellipse: lengths of the semi-axis known

*
Circle: radius known

Holes
can accounted for entering one of the measurements as negative:

*
For circular holes, choose Ellipse with A = -

*radius*, B =*radius*. (A < 0)
*
For square holes, choose Rectangle with A =

*-side length*, B =*side length*. (A < 0)**TI-84 Plus CE Program COMPAREA**

"EWS
2017-07-12"

0→T

Lbl
0

Menu("COMPOSITE
AREA","RIGHT
TRIANGLE",1,"TRIANGLE",2,"RECTANGLE",3,"SQUARE",4,"ELLIPSE",5,"CIRCLE",6,"FINAL",7)

Lbl
1

Disp
"RIGHT TRIANGLE"

Prompt
B,H

T+B*H/2→T

Goto
0

Lbl
2

Disp
"TRIANGLE"

Prompt
A,B,C

(A+B+C)/2→S

√(S*(S-A)*(S-B)*(S-C))+T→T

Goto
0

Lbl
3

Disp
"RECTANGLE"

Prompt
A,B

T+A*B→T

Goto
0

Lbl
4

Disp
"SQUARE"

Prompt
A

T+A²→T

Goto
0

Lbl
5

Disp
"ELLIPSE"

Prompt
A,B

T+π*A*B→T

Goto
0

Lbl
6

Disp
"CIRCLE"

Input
"RADIUS: ",A

T+π*A²→T

Goto
0

Lbl
7

Disp
"TOTAL AREA=",T

**Sharp EL-9600c Program COMPAREA**

0⇒T

Label
MENU

Print
“1. RIGHT TRIANGLE

Print
“2. TRIANGLE

Print
“3. RECTANGLE

Print
“4. SQUARE

Print
“5. ELLIPSE/CIRCLE

Print
“6. FINAL

Input
I

If
I=1 Goto RTRI

If
I=2 Goto GTRI

If
I=3 Goto RECT

If
I=4 Goto SQUA

If
I=5 Goto CIRC

If
I=6 Goto CALC

Goto
MENU

Label
RTRI

Print
“RIGHT TRIANGLE

Input
B

Input
H

T +
B*H/2 ⇒ T

Goto
MENU

Label
GTRI

Print
“TRIANGLE

Input
A

Input
B

Input
C

(A
+ B + C)/2 ⇒ S

√(S
* (S – A) * (S – B) * (S – C)) + T ⇒ T

Goto
MENU

Label
RECT

Print
“RECTANGLE

Input
A

Input
B

T +
A*B ⇒ T

Goto
MENU

Label
SQUA

Print
“SQUARE

Input
A

T +
A^2 ⇒ T

Goto
MENU

Label
CIRC

Print
“ELLIPSE/CIRCLE

Print
“CIRCLE: A=B

Input
A

Input
B

T +
π*A*B ⇒ T

Goto
MENU

Label
CALC

Print
“TOTAL AREA=

Print
T

Examples

Example
1:

Composite
area of:

(I): Right triangle: base of 3, height of 8

(II):
Rectangle: side lengths of 8 and 15

(III):
General triangle: side lengths of 8, 6, and 6

Result: 149.8885438

Example
2:

(I): Rectangle: lengths of 10 and 20

(II): Circular hole with radius of 2.5. (Enter as ellipse: A = -2.5, B = 2.5)

(III):
Square hole with side of 5 (Enter as rectangle, A = -5, B = 5)

Result: 155.3650459

Eddie

This
blog is property of Edward Shore, 2017.