|
|
|
| Welcome to the Monastery | |
| PerlMonks |
Re^2: Answer: How do I convert between decimal and binary?by Anonymous Monk |
| on Apr 05, 2013 at 04:42 UTC ( [id://1027063]=note: print w/replies, xml ) | Need Help?? |
|
#!/user/local/bin/perl
print "\nEnter the num:";
@rem=();
$dec =<STDIN>;
print "converting to binary";
while ($dec> 0)
{
@rem$i++ = $dec % 2;
$dec= int ($dec/2);
}
print reverse(@rem);
In Section
Seekers of Perl Wisdom
|
|
||||||||||||||||||||||