Thread Kleines mathe-skript (31 answers)
Opened by SirLant at 2003-09-02 16:39

Ishka
 2003-09-03 03:08
#83002 #83002
User since
2003-08-04
771 Artikel
HausmeisterIn
[Homepage] [default_avatar]
Doch...

Ich sollte mir wieder angewöhnen, gründlich und von oben nach unten zu lesen.
Nach pqs 'es war falsch, hatte den algorithmus nicht mehr so im kopf.' hatte ich im Kopf behalten, daß sie irgendwas falsches gesagt hat und das weiter oben von ihr ignoriert...\n\n

<!--EDIT|Ishka|1062544133-->
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}

View full thread Kleines mathe-skript