テスト

テスト (568ﾚｽ)
上下前次 1-新

14(1): デフォルトの名無しさん [sage] 2014/08/06(水) 20:45:51.78 ID:cDGFBMOc(1/2) AAS
>>11

11(1): デフォルトの名無しさん [sage] 2014/08/05(火) 22:56:44.69 ID:c2HoQkaC(3/4) AAS
>>9
＆nbsp;＆nbsp;＆nbsp;for i=０００

sub f {
    $n++ while ($m = $p*$n % $x) > 1;
    $m ? $n : 'false'
}

($p,$x,$n) = (213,16,1); say f;