马蹄形隧道横断面面积计算程序

马蹄形隧道横断面面积计算程序

（适用于CASIO FX-5800P可编程计算器）

编写：杨龙明

一、数学公式

1、矩形面积公式：P=AB 式中：A、B分别为矩形的边长。

2、扇形面积公式：M=0.008727R2W0式中R为扇形的半径，W为扇形的圆心角。

3、直角三角形面积公式：N=0.5CD 式中C为直角三角形的长边，D为直角三角形的短边。

二、源程序清单

MTXSDMJJS 马蹄形隧道横断面面积计算程序名

“MTXSDMJJS”显示程序名

Deg:Fix 6 ↲设置角度显示格式和小数位数

Lbi 0 ↲转移命令

“W=”?W↲输入扇形的圆心角

“R=”?R↲输入扇形的半径

“C=”？C ↲输入直角三角形的长边值

“A=”？A ↲输入矩形的边长值

“B=”？B ↲输入矩形的边长值

“D=”：⟶D 计算并显示直角三角形的短边边长

0.008727R2W⟶M ↲计算扇形面积

“SXMJ=”：M （显示符）显示扇形面积

CD⟶N ↲计算两个直角三角形的面积之和

“RTSJXMJ=”：N （显示符）显示两个直角三角形的面积之和AB⟶P ↲计算矩形面积

“JXMJ=”：P （显示符）显示矩形面积

M+N+P⟶S ↲计算马蹄形隧道横断面面积“MTXSDMJ=”：S（显示符）显示马蹄形隧道横断面面积Goto 0 转