简单问题,怎样将整数转为二进制数?如12,请高手帮忙!

ykbug 2000-08-05 08:51:00
...全文
138 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
dukeli 2000-08-10
  • 打赏
  • 举报
回复
根据数学算法来编程解决,很好的思路
hyzx2000 2000-08-10
  • 打赏
  • 举报
回复
/*
函数:string ltoa( long al_data, integer ai_base )
功能:将al_data转化成ai_base进制的字符串形式
*/

if ai_base <= 1 or ai_base > 36 then
return ''
end if

long ll_a
ll_a = al_data
string ls_bin = ''


long ll_b // 除数
ll_b = ai_base
long ll_c // 商
long ll_r // 余数

ll_c = ll_a

do
ll_r = Mod( ll_c, ll_b )
if ll_r < 10 then
ls_bin = string( ll_r ) + ls_bin
else
ls_bin = char( 55 + ll_r ) + ls_bin
end if
ll_c = ll_c / ll_b
loop while ll_c <> 0

return ls_bin
qiangsheng 2000-08-10
  • 打赏
  • 举报
回复
很不错的程序,10进制以下的转换都可以用。
hyzx2000 2000-08-05
  • 打赏
  • 举报
回复
long ll_a = 12
string ls_bin = ''


long ll_b = 2 // 除数
long ll_c // 商
long ll_r // 余数

ll_c = ll_a

do
ll_r = Mod( ll_c, ll_b )
ls_bin = string( ll_r ) + ls_bin
ll_c = ll_c / ll_b
loop while ll_c <> 0




MessageBox( '', ls_bin )

1,072

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧