[過去ログ]
【初心者】課題をクリアしていくスレ【講習会】 (787レス)
【初心者】課題をクリアしていくスレ【講習会】 http://mevius.5ch.net/test/read.cgi/gamedev/1086858349/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
259: x≠先生かつx=生徒 ⇒ x=俺 [sage] 04/07/06 07:38 ID:BOq5Vq10 #!D:\perl\bin\perl.exe print "Content-type: text/plain\n\n"; print "Start\n"; print "2\n"; $table[0] = 2; $i = 1; for(2..1000){ for($i += 2; ; $i += 2){ if(&IsPrime($i)){ last; } } } print "Finish"; exit(1); sub IsPrime{ (my $src) = @_; for($j = 0; $table[$j] <= sqrt($src); $j++){ if($src % $table[$j] == 0){ return 0; } } print $src."\n"; push(@table, $src); return 1; } # Perl版。printを取ってみると分かるけどPerlはインタープリタなのに # 結構処理速いね。。。 http://mevius.5ch.net/test/read.cgi/gamedev/1086858349/259
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 528 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.018s