Thread Codeverschlüsselungstechnik
(86 answers)
Opened by [E|B] at 2004-02-06 19:37
Er sprach nicht davon eine Entwicklung abzulehnen, sondern eine Degenerierung abzulehnen. Und es ist durchaus nicht so, daß zB. bei Cpan jede Modifikation an Modulen akzeptiert wird, sondern nur die guten.
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} |