Opened by SirLant at 2003-09-16 16:12
User since
2003-08-04
771 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-04
771 Artikel
HausmeisterIn
[quote=format_c,16.09.2003, 22:29]Also als bei uns damals in der Prüfung schriftliches Rechnen mit Binärzahlen dran kam, hab ich mich immer gern darum gedrückt, weil ich das absolut ekelhaft fand.
Mann kann alles durch Umwandeln rechnen.
Binärzahl in Dec, rechnen, und wieder Zurück umwandeln.
Ich weis ist was für Weicheier. Damals wusste ich nocht nicht, das das eigendlich gar nicht so verkehrt ist.
Wurde aber genau so anerkannt.
Gruß Alex[/quote]
da würd ich lieber ins Oktal-System umrechnen: geht wesentlcih schneller und beim rechnen mit überschlag muß man halt 8 statt 10 als Basis nehmen.
Mann kann alles durch Umwandeln rechnen.
Binärzahl in Dec, rechnen, und wieder Zurück umwandeln.
Ich weis ist was für Weicheier. Damals wusste ich nocht nicht, das das eigendlich gar nicht so verkehrt ist.
Wurde aber genau so anerkannt.
Gruß Alex[/quote]
da würd ich lieber ins Oktal-System umrechnen: geht wesentlcih schneller und beim rechnen mit überschlag muß man halt 8 statt 10 als Basis nehmen.
sub z{if(@_){1while$x[$k=rand 10];t($t=$x[$k]=1)}print map"$z[$x[$_]]$_".($_%3?
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}