易语言如何取小数点后面的第一位,其余的过滤掉?

发布网友 发布时间：2022-04-24 03:35

我来回答

共3个回答

热心网友 时间：2023-10-25 07:04

.版本 2
.支持库 spec

.子程序 _按钮1_被单击

调试输出 (取小数点后第一位 (到小数 (编辑框1.内容)))

.子程序 取小数点后第一位, 整数型
.参数 取值小数, 小数型
.局部变量 临时分割, 文本型, , "0"
.局部变量 临时文本, 文本型
.局部变量 返回整数, 整数型

临时文本 ＝ 到文本 (取值小数)
.判断开始 (寻找文本 (临时文本, “.”, , 假) ＝ -1)
返回整数 ＝ 0
.默认
临时分割 ＝ 分割文本 (到文本 (取值小数), “.”, )
返回整数 ＝ 到整数 (取文本左边 (临时分割 [2], 1))

.判断结束

返回 (返回整数)

热心网友 时间：2023-10-25 07:04

yhjm,uy

热心网友 时间：2023-10-25 07:05

调用格式： 〈双精度小数型〉 四舍五入 （双精度小数型 欲被四舍五入的数值，［整数型 被舍入的位置］） - 系统核心支持库->算术运算
英文名称：round
返回按照指定的方式进行四舍五入运算的结果数值。本命令为初级命令。
参数<1>的名称为“欲被四舍五入的数值”，类型为“双精度小数型（double）”。
参数<2>的名称为“被舍入的位置”，类型为“整数型（int）”，可以被省略。如果大于0，表示小数点右边应保留的位数；如果等于0，表示舍入到整数；如果小于0，表示小数点左边舍入到的位置。例如：四舍五入 (1056.65, 1) 返回 1056.7； 四舍五入 (1056.65, 0) 返回 1057； 四舍五入 (1056.65, -1) 返回 1060。如果省略本参数，则默认为0。

例子：
编辑框1.内容 ＝ 到文本 (四舍五入 (10.23, 1)) 给分我！追问取手机号码的后4位，然后除以80，得到一个数字，取该数字的小数位再乘以80，最后得出的数，查下面的附表，即得之。 例：136****3456 后4位是3456，3456/80=43.2，去掉整数位43，得到0.2，再乘以80得到16
本人初学易语言，请高手给写个程序作为我的参考行吗？上面就是题目。

热心网友 时间：2023-10-25 07:04

.版本 2
.支持库 spec

.子程序 _按钮1_被单击

调试输出 (取小数点后第一位 (到小数 (编辑框1.内容)))

.子程序 取小数点后第一位, 整数型
.参数 取值小数, 小数型
.局部变量 临时分割, 文本型, , "0"
.局部变量 临时文本, 文本型
.局部变量 返回整数, 整数型

临时文本 ＝ 到文本 (取值小数)
.判断开始 (寻找文本 (临时文本, “.”, , 假) ＝ -1)
返回整数 ＝ 0
.默认
临时分割 ＝ 分割文本 (到文本 (取值小数), “.”, )
返回整数 ＝ 到整数 (取文本左边 (临时分割 [2], 1))

.判断结束

返回 (返回整数)

热心网友 时间：2023-10-25 07:04

yhjm,uy

热心网友 时间：2023-10-25 07:05

调用格式： 〈双精度小数型〉 四舍五入 （双精度小数型 欲被四舍五入的数值，［整数型 被舍入的位置］） - 系统核心支持库->算术运算
英文名称：round
返回按照指定的方式进行四舍五入运算的结果数值。本命令为初级命令。
参数<1>的名称为“欲被四舍五入的数值”，类型为“双精度小数型（double）”。
参数<2>的名称为“被舍入的位置”，类型为“整数型（int）”，可以被省略。如果大于0，表示小数点右边应保留的位数；如果等于0，表示舍入到整数；如果小于0，表示小数点左边舍入到的位置。例如：四舍五入 (1056.65, 1) 返回 1056.7； 四舍五入 (1056.65, 0) 返回 1057； 四舍五入 (1056.65, -1) 返回 1060。如果省略本参数，则默认为0。

例子：
编辑框1.内容 ＝ 到文本 (四舍五入 (10.23, 1)) 给分我！追问取手机号码的后4位，然后除以80，得到一个数字，取该数字的小数位再乘以80，最后得出的数，查下面的附表，即得之。 例：136****3456 后4位是3456，3456/80=43.2，去掉整数位43，得到0.2，再乘以80得到16
本人初学易语言，请高手给写个程序作为我的参考行吗？上面就是题目。

热心网友 时间：2023-10-25 07:04

.版本 2
.支持库 spec

.子程序 _按钮1_被单击

调试输出 (取小数点后第一位 (到小数 (编辑框1.内容)))

.子程序 取小数点后第一位, 整数型
.参数 取值小数, 小数型
.局部变量 临时分割, 文本型, , "0"
.局部变量 临时文本, 文本型
.局部变量 返回整数, 整数型

临时文本 ＝ 到文本 (取值小数)
.判断开始 (寻找文本 (临时文本, “.”, , 假) ＝ -1)
返回整数 ＝ 0
.默认
临时分割 ＝ 分割文本 (到文本 (取值小数), “.”, )
返回整数 ＝ 到整数 (取文本左边 (临时分割 [2], 1))

.判断结束

返回 (返回整数)

热心网友 时间：2023-10-25 07:04

yhjm,uy

热心网友 时间：2023-10-25 07:05

调用格式： 〈双精度小数型〉 四舍五入 （双精度小数型 欲被四舍五入的数值，［整数型 被舍入的位置］） - 系统核心支持库->算术运算
英文名称：round
返回按照指定的方式进行四舍五入运算的结果数值。本命令为初级命令。
参数<1>的名称为“欲被四舍五入的数值”，类型为“双精度小数型（double）”。
参数<2>的名称为“被舍入的位置”，类型为“整数型（int）”，可以被省略。如果大于0，表示小数点右边应保留的位数；如果等于0，表示舍入到整数；如果小于0，表示小数点左边舍入到的位置。例如：四舍五入 (1056.65, 1) 返回 1056.7； 四舍五入 (1056.65, 0) 返回 1057； 四舍五入 (1056.65, -1) 返回 1060。如果省略本参数，则默认为0。

例子：
编辑框1.内容 ＝ 到文本 (四舍五入 (10.23, 1)) 给分我！追问取手机号码的后4位，然后除以80，得到一个数字，取该数字的小数位再乘以80，最后得出的数，查下面的附表，即得之。 例：136****3456 后4位是3456，3456/80=43.2，去掉整数位43，得到0.2，再乘以80得到16
本人初学易语言，请高手给写个程序作为我的参考行吗？上面就是题目。

热心网友 时间：2023-10-25 07:04

.版本 2
.支持库 spec

.子程序 _按钮1_被单击

调试输出 (取小数点后第一位 (到小数 (编辑框1.内容)))

.子程序 取小数点后第一位, 整数型
.参数 取值小数, 小数型
.局部变量 临时分割, 文本型, , "0"
.局部变量 临时文本, 文本型
.局部变量 返回整数, 整数型

临时文本 ＝ 到文本 (取值小数)
.判断开始 (寻找文本 (临时文本, “.”, , 假) ＝ -1)
返回整数 ＝ 0
.默认
临时分割 ＝ 分割文本 (到文本 (取值小数), “.”, )
返回整数 ＝ 到整数 (取文本左边 (临时分割 [2], 1))

.判断结束

返回 (返回整数)

热心网友 时间：2023-10-25 07:04

yhjm,uy

热心网友 时间：2023-10-25 07:05

调用格式： 〈双精度小数型〉 四舍五入 （双精度小数型 欲被四舍五入的数值，［整数型 被舍入的位置］） - 系统核心支持库->算术运算
英文名称：round
返回按照指定的方式进行四舍五入运算的结果数值。本命令为初级命令。
参数<1>的名称为“欲被四舍五入的数值”，类型为“双精度小数型（double）”。
参数<2>的名称为“被舍入的位置”，类型为“整数型（int）”，可以被省略。如果大于0，表示小数点右边应保留的位数；如果等于0，表示舍入到整数；如果小于0，表示小数点左边舍入到的位置。例如：四舍五入 (1056.65, 1) 返回 1056.7； 四舍五入 (1056.65, 0) 返回 1057； 四舍五入 (1056.65, -1) 返回 1060。如果省略本参数，则默认为0。

例子：
编辑框1.内容 ＝ 到文本 (四舍五入 (10.23, 1)) 给分我！追问取手机号码的后4位，然后除以80，得到一个数字，取该数字的小数位再乘以80，最后得出的数，查下面的附表，即得之。 例：136****3456 后4位是3456，3456/80=43.2，去掉整数位43，得到0.2，再乘以80得到16
本人初学易语言，请高手给写个程序作为我的参考行吗？上面就是题目。