Bintodec

luty 15, 2007 at 12:59 am (programowanie)

Jestem z siebie dumny, dziś napisałem swój pierwszy program w perlu, niby nic trudnego, ale zawsze może sie komuś przydać :)

#!/usr/bin/perl
print "Witaj w programie bintodec napisanym przez Bartosza Nenrosa Markowskiego"
print "Jaką cyfrę chcesz przekonwertować?\n";
$input = stdin ;
$decimal = oct( "0b$input" );
print "W systemie dziesiętnym jest to $decimal \n";
uwaga stdin w linijce 4 trzeba wziąsć w nawias

Bezpośredni odnośnik 10 komentarzy