Opened by kabel at 2003-08-10 13:45
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=havi,25.08.2003, 13:07]Ich war Anfangs auch für die Zahlen, aber es tauchen doch immer wieder Diskussionen darüber auf und es werden jedes Mal ähnliche Argumente gebracht und das nervt.
mfg havi[/quote]
Denkst du, die Diskussionen zu dem Thema würden aufhören, wenn wir sie abschaffen würden? Ok, dann würde die Diskussion statt 'abschaffen' 'einführen' heißen, aber ansonsten ist es das gleiche.
mfg havi[/quote]
Denkst du, die Diskussionen zu dem Thema würden aufhören, wenn wir sie abschaffen würden? Ok, dann würde die Diskussion statt 'abschaffen' 'einführen' heißen, aber ansonsten ist es das gleiche.
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}