$n=10; $flag=0; $adam=1; while(1) { if ($flag==0) { $ritardista=1; $flag=1; } else { $ritardista=$oldest; } $dio=$best; $idiot=$worst; $i=1+int(rand($n)); $trials++; if ($i==$adam) { $adam_s++; } if ($i==$ritardista) { $rita_s++; } if ($trials%100==0) { print $adam_s/$trials." ".$rita_s/$trials."\n"; } $max_age=0; for(1..$n) { if($_==$i) { $age[$_]=0; } else { $age[$_]++; if($age[$_]>$max_age) { $max_age=$age[$_]; $oldest=$_; } } } }