04-10-2015, 05:09 AM
Regular Polygon: Internal Angle and Area: RPOLYG
Link to the original blog entry: http://edspi31415.blogspot.com/2015/03/r...s-and.html
Input:
2: s: side length
1: n: number of sides
Program:
<< DEG DUP INV 360 * NEG 180 + UNROT 4 / SWAP SQ * SWAP DUP UNROT 2 / TAN * >>
Output:
2: Interior Angle
1: Area
Link to the original blog entry: http://edspi31415.blogspot.com/2015/03/r...s-and.html
Input:
2: s: side length
1: n: number of sides
Program:
<< DEG DUP INV 360 * NEG 180 + UNROT 4 / SWAP SQ * SWAP DUP UNROT 2 / TAN * >>
Output:
2: Interior Angle
1: Area