|
发表于 2014-6-28 15:13:23
|
显示全部楼层
四川省南充市
|
大写数字到数值 | 长整数型 | | |
大写数字 | 文本型 | | | | 是否为金额 | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 结果 | 长整数型 | | | temp | 文本型 | | | 循环变量 | 整数型 | | | 数字 | 整数型 | | | 数 | 整数型 | | | 状态 | 整数型 | | | 如果真 (取文本长度 (大写数字 ) > 18 )返回 (-1 )变量循环首 (1, 取文本长度 (大写数字 ), 2, 循环变量 )temp = 取文本中间 (大写数字, 循环变量, 2 )如果 (是否为金额 )数字 = 文本_数字_金额 (temp )数字 = 文本_数字 (temp ) 如果 (状态 = 0 )数 = 数字 状态 = 1 如果 (数 = 0 )数 = 数字 状态 = 1 结果 = 结果 + 数 × 数字 状态 = 0 如果真 (循环变量 = 取文本长度 (大写数字 ) - 1 )结果 = 结果 + 数字 变量循环尾 ()返回 (结果 )变量名 | 类 型 | 静态 | 数组 | 备 注 | c | 文本型 | | | temp | 整数型 | | | d | 文本型 | | |
c = “零一二三四五六七八九”d = “十百千万亿”temp = 寻找文本 (c, 文本, , 假)如果真 (temp ≠ -1 )返回 (到整数 (temp \ 2 )) temp = 寻找文本 (d, 文本, , 假)如果真 (temp ≠ -1 )如果真 (temp = 1 )返回 (10 )如果真 (temp = 3 )返回 (100 )如果真 (temp = 5 )返回 (1000 )如果真 (temp = 7 )返回 (10000 )如果真 (temp = 9 )返回 (100000000 )返回 (1)变量名 | 类 型 | 静态 | 数组 | 备 注 | c | 文本型 | | | temp | 整数型 | | | d | 文本型 | | |
c = “零壹贰叁肆伍陆柒捌玖”d = “拾佰仟万亿”temp = 寻找文本 (c, 文本, , 假)如果真 (temp ≠ -1 )返回 (到整数 (temp \ 2 )) temp = 寻找文本 (d, 文本, , 假)如果真 (temp ≠ -1 )如果真 (temp = 1 )返回 (10 )如果真 (temp = 3 )返回 (100 )如果真 (temp = 5 )返回 (1000 )如果真 (temp = 7 )返回 (10000 )如果真 (temp = 9 )返回 (100000000 )返回 (1)调试输出 (大写数字到数值 (数值到大写 (10076, 假), 真)) 调试输出 (大写数字到数值 (数值到大写 (98765, 假), 真)) 调试输出 (大写数字到数值 (“八万零三十六”, ))
目前只写到 5位数字 以后的自行判断了
两种格式 “一二 三”
“壹 贰 叁” |
评分
-
参与人数 1 | 荣誉 +1 |
收起
理由
|
笨潴
| + 1 |
热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻! |
查看全部评分
|