求一个小数转整数进一（虽然比较基础，但没有思路）

JOCK001

求一个小数转整数进一，无论小数的后面是多少都进1，如果是整数则保持原样不变。例如：1.2则返回2，1.6也是返回2，3则返回3
或者问题比较基础，但真的找不到办法，看看各位大神有什么好的思路。

w80561307

  

子程序名	返回值类型	公开	备 注
Trun	整数型
参数名	类 型	参考	可空	数组	备 注
value	小数型

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

j_v1 ＝ 到整数 (value)
如果 (value ＞ j_v1)
返回 (j_v1 ＋ 1)
返回 (j_v1)

.版本 2<br /> <br /> .子程序 Trun, 整数型<br /> .参数 value, 小数型<br /> .局部变量 j_v1, 整数型<br /> <br /> j_v1 ＝ 到整数 (value)<br /> .如果 (value ＞ j_v1)<br />     返回 (j_v1 ＋ 1)<br /> .否则<br />     返回 (j_v1)<br /> .如果结束

笨来无一悟

负负得正 -取整(-参数)

悟空科技

  

变量名	类 型	静态	数组	备 注
数字1	双精度小数型
数字2	整数型

数字1 ＝ 1.2
数字2 ＝ 到整数 (数字1)
如果真 (数字1 ＞ 数字2)
数字2 ＝ 数字2 ＋ 1

.版本 2<br /> <br /> .局部变量 数字1, 双精度小数型<br /> .局部变量 数字2, 整数型<br /> <br /> 数字1 ＝ 1.2<br /> 数字2 ＝ 到整数 (数字1)<br /> .如果真 (数字1 ＞ 数字2)<br />     数字2 ＝ 数字2 ＋ 1

笨来无一悟

要效率高的另外想办法 要简单的这个就简单

  

子程序名	返回值类型	公开	备 注
向上取整	小数型
参数名	类 型	参考	可空	数组	备 注
参数	小数型

返回 (���取整 (－参数))

.版本 2<br /> <br /> .子程序 向上取整, 小数型<br /> .参数 参数, 小数型<br /> <br /> 返回 (－取整 (－参数))

lisher

  

子程序名	返回值类型	公开	备 注
小数转换	小数型
参数名	类 型	参考	可空	数组	备 注
转变的小数	小数型

变量名	类 型	静态	数组	备 注
arry	文本型		0

如果 (寻找文本 (到文本 (转变的小数), “.”, , 假) ＝ -1)
返回 (到整数 (转变的小数))
arry ＝ 分割文本 (到文本 (转变的小数), “.”, )
返回 (到整数 (arry [1]) ＋ 1)

.版本 2<br /> <br /> .子程序 小数转换, 小数型<br /> .参数 转变的小数, 小数型<br /> .局部变量 arry, 文本型, , "0"<br /> <br /> .如果 (寻找文本 (到文本 (转变的小数), “.”, , 假) ＝ -1)<br />     返回 (到整数 (转变的小数))<br /> .否则<br />     arry ＝ 分割文本 (到文本 (转变的小数), “.”, )<br />     返回 (到整数 (arry [1]) ＋ 1)

补充内容 (2023-11-23 14:33):
哦，返回类型  写整数型

b0y

  

子程序名	返回值类型	公开	备 注
MathCeil	整数型		向上取整,返回大于参数的最小整数.整数返回自身.
参数名	类 型	参考	可空	数组	备 注
dNum	双精度小数型

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

i ＝ 取整 (dNum)
如果 (i ＜ dNum)
返回 (i ＋ 1)
返回 (i)

.版本 2<br /> <br /> .子程序 MathCeil, 整数型, 公开, 向上取整,返回大于参数的最小整数.整数返回自身.<br /> .参数 dNum, 双精度小数型<br /> .局部变量 i, 整数型<br /> <br /> i ＝ 取整 (dNum)<br /> .如果 (i ＜ dNum)<br />     返回 (i ＋ 1)<br /> .否则<br />     返回 (i)

补充内容 (2023-11-23 15:16):
测试百万次  125毫秒

笨来无一悟

-取整(-参数)有零头进1四舍五入 (参数 ＋ 0.5, 0)无条件进1