[過去ログ]
ノベルツール選考スレXP (983レス)
ノベルツール選考スレXP http://peace.5ch.net/test/read.cgi/gamedev/1083482407/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
394: 名前は開発中のものです。 [sage] 04/12/01 07:01:15 ID:gWrY//jq んじゃ、Pascalね。 Delphi使っていないんで、コンパイラはppc bccとの比較は1/1.3倍程度、Delphi付属コンパイラならもっと速いかも。 それにしても、Pascalはコンパイル速いなぁ ppcは初めて使ったのでおかしなところがあったら直して>pascalユーザー ソースは下。 http://peace.5ch.net/test/read.cgi/gamedev/1083482407/394
395: 名前は開発中のものです。 [sage] 04/12/01 07:02:44 ID:gWrY//jq //----------------------------------------- program noname; uses mmsystem; var times,count,begin_time,i,j: integer; const loop=10; begin for count := 0 to loop do begin begin_time:=timeGetTime(); for i:=2 to 10000 do begin for j:=2 to i do begin if i mod j=0 then break; end; end; times+=timeGetTime()-begin_time; end; writeLn('Average ',times div loop,' ms.'); readln(); end. //------------------------------------------- http://peace.5ch.net/test/read.cgi/gamedev/1083482407/395
397: 名前は開発中のものです。 [sage] 04/12/01 07:31:21 ID:gWrY//jq program noname; uses mmsystem; var times,count,begin_time,i,j: integer; const loop=10; begin for count := 0 to loop-1 do begin begin_time:=timeGetTime(); for i:=2 to 10000-1 do begin for j:=2 to i-1 do begin if i mod j=0 then break; end; end; times+=timeGetTime()-begin_time; end; writeLn('Average ',times div loop,' ms.'); readln(); end. //---------------------------------- これだと、bcc比較、1/1.2になるね。 http://peace.5ch.net/test/read.cgi/gamedev/1083482407/397
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.027s