結果

問題 No.732 3PrimeCounting
ユーザー ciel
提出日時 2018-09-11 00:11:15
言語 Crystal
(1.14.0)
結果
RE  
実行時間 -
コード長 293 bytes
コンパイル時間 11,494 ms
コンパイル使用メモリ 295,684 KB
実行使用メモリ 6,948 KB
最終ジャッジ日時 2024-06-30 19:35:13
合計ジャッジ時間 15,895 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 68 RE * 21
権限があれば一括ダウンロードができます

ソースコード

diff # 

n=gets.not_nil!.to_i
t=[true]*(3*n+1)
t[0]=t[1]=false
(2...t.size).each{|i|
	if t[i]
		(i*2).step(to: t.size-1,by: i){|j|t[j]=false}
	end
}
q=(2...t.size).select{|i|t[i]}
o=q.dup
r=0
a=[0]*t.size
q.each{|c|
	break if c>n
	o.each{|s|r+=a[s-c]}
	o.shift
	q.each{|x|break if x>=c;a[x+c]+=1}
}
p r
0