圆周上三点坐标计算圆心坐标

] 圆周上三点坐标计算圆心坐标.半径、圆面积Fx5800编程

本程序为圆周上已知的三点坐标计算圆半径、圆心坐标、圆面积及弓形面积,希望大家共同

学习并指点.谢谢了.

用圆周上三点坐标计算圆半径、圆心坐标、圆面积及弓形面积

CASIO（5800）计算程序

3P-R-O-AREA 程序名

Fix3:“XA=”? →A:“YA=”? →B:“XB=”? →C:“YB=”? →D:“XC=”? →E:“YC=”?

→F↙

↙∍ C-A→G:D-B→H:E-A→I:F-B→J:E-C→K:F-D→L

tan-1(J÷I) →X:I﹤0=﹥X+180→X ↙∍

↙∍ tan-1(H÷G) →Y:G﹤0=﹥Y+180→Y

tan-1(L÷K) →Z:K﹤0=﹥Z+180→Z ↙∍

X-Y→M: M﹤0=﹥M+360→M ：Z-X→N: N﹤0=﹥M+360→N ：M+N→O↙∍

(G^2+H^2)开平方→U： (K^2+L^2)开平方→V： (I^2+J^2)开平方→W：

“R=”:W÷2÷sin(O) →R◢

tan-1(H÷G) →Q:If G﹥0 ↙∍:Then Q+180→Q :Goto 1: IfEn d

Lb1: U÷2→S: (R^2+S^2)开平方→T ↙∍

“X0=”:C+Scos(Q)+Tsin(Q) ◢

“Y0=”:D+Ssin(Q)-Tcos(Q) ◢

“CIRC-AREA(M2)=”:ΠR2→P◢

(ROΠ)÷90→L：“BOW-AREA(M2)=”:R(L-Wcos(O)) ÷2◢

∍“End”

说明：

输入显示：XA、YA、XB、YB、XC、YC 分别为圆周上已知的三点坐标值。

结果显示：R为圆半径； X0，Y0为所求的圆心坐标；“CIRC-AREA(M2)=”为圆面积；

“BO W-AREA(M2)=”为所求的弓形面积。