问题描述
当我输入数字 2,5,7 时出现问题,结果正常,当我输入数字 1,3,4,6 时,结果不匹配。
define variable oct as character.
define variable l-oct as integer.
define variable oktal as integer.
define variable l-oktal as integer.
define variable count as integer.
define variable i as integer.
define variable bin as character.
define variable bin2 as character.
end.
do i = length(bin) to 1 by -1:
bin2 = bin2 + substring(bin,i,1).
end.
display bin2 with frame a down.
解决方法
您的 if
else if
火车缺少 else if
。 if
else if
列车通常由 case
语句提供更好的服务。
此外,您首先要构建一个从后到前的三位数字组二进制字符串,然后在末尾每个数字将其反转。
因此,在八进制 1
变成二进制 001
的情况下,您将其翻转为 100
。不要在之后翻转,而是正确连接您的字符串以开始,因此替换所有出现的:
bin = bin + 'xxx'
与:
bin = 'xxx' + bin