【初心者】課題をクリアしていくスレ【講習会】at GAMEDEV【初心者】課題をクリアしていくスレ【講習会】 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト257:名前は開発中のものです。 04/07/06 01:48 IHRV3HSb.net 素数スレになってるのだが・・・ 258:名前は開発中のものです。 04/07/06 02:29 pkSoPn0/.net Delphi エラトステネスの篩 http://gamdev.org/up/img/810.zip 259:x≠先生かつx＝生徒 ⇒ x＝俺 04/07/06 07:38 BOq5Vq10.net #!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はインタープリタなのに # 結構処理速いね。。。 260:名前は開発中のものです。 04/07/06 12:03 IHRV3HSb.net >>259 Perlは見かけ上インタプリタだけど、 処理はコンパイル後実行だと聞いたことがある。 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch