結果

問題 No.723 2つの数の和
コンテスト
ユーザー nobigomu
提出日時 2018-08-05 14:02:17
言語 Lua
(LuaJit 2.1.1734355927)
結果
TLE  
実行時間 -
コード長 545 bytes
コンパイル時間 134 ms
コンパイル使用メモリ 6,940 KB
実行使用メモリ 13,756 KB
最終ジャッジ日時 2024-09-19 18:02:43
合計ジャッジ時間 6,305 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 7 WA * 1 TLE * 3 -- * 11
権限があれば一括ダウンロードができます

ソースコード

diff # 

local ffi = require 'ffi'
local C = ffi.C
ffi.cdef 'int scanf(const char *, ...);'

print((function (n, x, cd)
	local a,h,r={},{},0
	for _=1,n do C.scanf("%d",cd) if h[cd[0]]==nil then h[cd[0]]=0 end h[cd[0]]=h[cd[0]]+1 end
	for k,_ in pairs(h) do table.insert(a,k) end table.sort(a)
	for i=1,#a do
		if a[i]*2==x then r=r+h[a[i]] goto bot end
		for j=i+1,#a do
			local t=a[i]+a[j]
			if t>x then break end
			if t==x then r=r+h[a[i]]*h[a[j]]*2 end
		end ::bot::
	end
	return r
end)(io.stdin:read("*n"), io.stdin:read("*n"), ffi.new("int[1]")))
0