【递归】【极简】【大数】两种算法实现任意进制之间转换

明天自然醒

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

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

调试输出 (十进制转换任意进制 (“32743521716605264000000000000000000000000000000000000000000”, 16))
变量循环首 (2, 36, 1, i)
调试输出 (“a1b2c3(16)”, 任意进制转换 (“a1b2c3”, 16, i) ＋ “(” ＋ 到文本 (i) ＋ “)”)
变量循环尾 ()

子程序名	返回值类型	公开	备 注
十进制转换任意进制	文本型		36以内任意转换，也可以改成任意进制之间的转换
参数名	类 型	参考	可空	数组	备 注
数值	文本型
进制	整数型				必须大于2

变量名	类 型	静态	数组	备 注
进制符号	文本型
bigINT	大数
base	大数

进制符号 ＝ “0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”
如果真 (进制 ＜ 2 或 进制 ＞ 36)
返回 (“error”)

bigINT.导入文本 (数值)
base.导入数字 (进制)
如果真 (bigINT.小于 (base))
返回 (取文本中间 (进制符号, 到整数 (数值) ＋ 1, 1))

返回 (十进制转换任意进制 (bigINT.整除 (base).导出文本 (), 进制) ＋ 取文本中间 (进制符号, bigINT.求余 (base).导出整数 () ＋ 1, 1))

子程序名	返回值类型	公开	备 注
任意进制转换	文本型		36以内任意转换
参数名	类 型	参考	可空	数组	备 注
数值	文本型
原进制数	整数型
输出进制数	整数型

变量名	类 型	静态	数组	备 注
v	大数
value	字节集
base	大数
temp	大数
zero	大数
i	整数型
output	文本型

如果真 (原进制数 ＜ 2 或 原进制数 ＞ 36 或 输出进制数 ＜ 2 或 输出进制数 ＞ 36)
返回 (“error”)

base.导入数字 (原进制数)
value ＝ 到字节集 (到大写 (数值))
v.导入数字 (0)
计次循环首 (取字节集长度 (value), i)
如果 (value [i] ≥ 65)
temp.导入数字 (value [i] － 55)
temp.导入数字 (value [i] － 48)
v ＝ temp.加 (v.乘 (base))
计次循环尾 ()
zero.导入数字 (0)
base.导入数字 (输出进制数)
判断循环首 (v.等于 (zero) ＝ 假)
如果 (v.求余 (base).导出整数 () ＜ 10)
output ＝ 字符 (48 ＋ v.求余 (base).导出整数 ()) ＋ output
output ＝ 字符 (55 ＋ v.求余 (base).导出整数 ()) ＋ output
v ＝ v.整除 (base)
判断循环尾 ()
返回 (output)

i支持库列表	支持库注释
spec	特殊功能支持库
eCalc	数值计算支持库

.版本 2<br /> .支持库 spec<br /> .支持库 eCalc<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 value<br /> <br /> 调试输出 (十进制转换任意进制 (“32743521716605264000000000000000000000000000000000000000000”, 16))<br /> .变量循环首 (2, 36, 1, i)<br />     调试输出 (“a1b2c3(16)”, 任意进制转换 (“a1b2c3”, 16, i) ＋ “(” ＋ 到文本 (i) ＋ “)”)<br /> .变量循环尾 ()<br /> <br /> .子程序 十进制转换任意进制, 文本型, , 36以内任意转换，也可以改成任意进制之间的转换<br /> .参数 数值, 文本型<br /> .参数 进制, 整数型, , 必须大于2<br /> .局部变量 进制符号, 文本型<br /> .局部变量 bigINT, 大数<br /> .局部变量 base, 大数<br /> <br /> 进制符号 ＝ “0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ”<br /> .如果真 (进制 ＜ 2 或 进制 ＞ 36)<br />     返回 (“error”)<br /> .如果真结束<br /> <br /> bigINT.导入文本 (数值)<br /> base.导入数字 (进制)<br /> <br /> .如果真 (bigINT.小于 (base))<br />     返回 (取文本中间 (进制符号, 到整数 (数值) ＋ 1, 1))<br /> .如果真结束<br /> <br /> 返回 (十进制转换任意进制 (bigINT.整除 (base).导出文本 (), 进制) ＋ 取文本中间 (进制符号, bigINT.求余 (base).导出整数 () ＋ 1, 1))<br /> <br /> <br /> .子程序 任意进制转换, 文本型, , 36以内任意转换<br /> .参数 数值, 文本型<br /> .参数 原进制数, 整数型<br /> .参数 输出进制数, 整数型<br /> .局部变量 v, 大数<br /> .局部变量 value, 字节集<br /> .局部变量 base, 大数<br /> .局部变量 temp, 大数<br /> .局部变量 zero, 大数<br /> .局部变量 i, 整数型<br /> .局部变量 output, 文本型<br /> <br /> .如果真 (原进制数 ＜ 2 或 原进制数 ＞ 36 或 输出进制数 ＜ 2 或 输出进制数 ＞ 36)<br />     返回 (“error”)<br /> .如果真结束<br /> <br /> base.导入数字 (原进制数)<br /> value ＝ 到字节集 (到大写 (数值))<br /> v.导入数字 (0)<br /> .计次循环首 (取字节集长度 (value), i)<br />     .如果 (value <i> ≥ 65)<br />         temp.导入数字 (value <i> － 55)<br />     .否则<br />         temp.导入数字 (value <i> － 48)<br />     .如果结束<br />     v ＝ temp.加 (v.乘 (base))<br /> .计次循环尾 ()<br /> <br /> zero.导入数字 (0)<br /> base.导入数字 (输出进制数)<br /> .判断循环首 (v.等于 (zero) ＝ 假)<br />     .如果 (v.求余 (base).导出整数 () ＜ 10)<br />         output ＝ 字符 (48 ＋ v.求余 (base).导出整数 ()) ＋ output<br />     .否则<br />         output ＝ 字符 (55 ＋ v.求余 (base).导出整数 ()) ＋ output<br />     .如果结束<br />     v ＝ v.整除 (base)<br /> .判断循环尾 ()<br /> <br /> 返回 (output)

清风徐来2

感谢分享

lmwdz

666666666666666666

AK48

用户组略屌

59hdvj

支持

亿万

感谢分享

mh3400425

支持开源~！感谢分享

ttggnn

感谢分享

kingsoftgt

牛B 下载试试牛B 下载试试

59hdvj

感谢分享