求直角三角形角度

|bingbing|

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

再学一遍数学 (1, 1)
再学一遍数学 (3, 4)
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
再学一遍数学
参数名	类 型	参考	可空	数组	备 注
a	整数型
b	整数型

变量名	类 型	静态	数组	备 注
c	整数型

c ＝ 求平方根 (到整数 (a × a) ＋ 到整数 (b × b))
调试输出 (“锐角1：SIN” ＋ 到文本 (a) ＋ “/” ＋ 到文本 (c) ＋ “_角度是” ＋ 到文本 (到整数 (求反正切值 (a ÷ c))), “锐角2：SIN” ＋ 到文本 (b) ＋ “/” ＋ 到文本 (c) ＋ “_角度是” ＋ 到文本 (到整数 (求反正切值 (b ÷ c))))

子程序名	返回值类型	公开	备 注
求反正切值	双精度小数型		返回角度值
参数名	类 型	参考	可空	数组	备 注
正切值	双精度小数型

返回 (求反正切 (正切值) × 180 ÷ #pi )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 再学一遍数学 (1, 1)<br /> 再学一遍数学 (3, 4)<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 再学一遍数学<br /> .参数 a, 整数型<br /> .参数 b, 整数型<br /> .局部变量 c, 整数型<br /> <br /> c ＝ 求平方根 (到整数 (a × a) ＋ 到整数 (b × b))<br /> 调试输出 (“锐角1：SIN” ＋ 到文本 (a) ＋ “/” ＋ 到文本 (c) ＋ “_角度是” ＋ 到文本 (到整数 (求反正切值 (a ÷ c))), “锐角2：SIN” ＋ 到文本 (b) ＋ “/” ＋ 到文本 (c) ＋ “_角度是” ＋ 到文本 (到整数 (求反正切值 (b ÷ c))))<br /> <br /> .子程序 求反正切值, 双精度小数型, 公开, 返回角度值<br /> .参数 正切值, 双精度小数型<br /> <br /> 返回 (求反正切 (正切值) × 180 ÷ #pi)

发现可以直接用支持库命令，不用套模块

seannee

mcscm 发表于 2020-10-14 16:24
在增加个到整数

为啥我之前试了不行，奇了怪了