- Perlについての質問箱 64箱目 [転載禁止]©2ch.net
173 :デフォルトの名無しさん[]:2015/04/09(木) 11:45:47.57 ID:E0v+Buu6 - my($n,$m);
for($n=0;$n<3;$n++){ srand($n); for($m=0;$m<10;$m++){ my($r) = int(rand(10)); print "value=$r<br>"; } print "<br><br>"; } 3回とも最初が0になってしまいます 0にならないにはどうしたらいいんですか?
|
|