文章详情

  • 游戏榜单
  • 软件榜单
关闭导航
热搜榜
热门下载
热门标签
php爱好者> php文档>[Perl]转换十进制为其他任意进制

[Perl]转换十进制为其他任意进制

时间:2005-09-08  来源:huhuegg

很简单啦~

#!/usr/bin/perl -w
$out="";

print("Change 10 format number to-->? ");
$format=<STDIN>;
chomp $format;
print("input 10 format number:");
$_=<STDIN>;
chomp $_;
while ($_>0) {
                $mo=$_%$format;
                $_=($_-$mo)/$format;
                $out=$mo . $out;
}
print("$out ");

相关阅读 更多 +
排行榜 更多 +
冒名顶替者战争

冒名顶替者战争

策略塔防 下载
SUPERSTAR STARSHIP

SUPERSTAR STARSHIP

音乐节奏 下载
解压大师

解压大师

音乐节奏 下载