結果

問題 No.39 桁の数字を入れ替え
コンテスト
ユーザー nobigomu
提出日時 2018-05-07 17:09:09
言語 Lua
(LuaJit 2.1.1774638290)
コンパイル:
luajit -b _filename_ a.out
実行:
luajit _filename_
結果
WA  
実行時間 -
コード長 515 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 406 ms
コンパイル使用メモリ 8,096 KB
実行使用メモリ 7,848 KB
最終ジャッジ日時 2026-03-16 11:44:32
合計ジャッジ時間 1,398 ms
ジャッジサーバーID
（参考情報） 		judge1_0 / judge3_0
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
other AC * 13 WA * 6
権限があれば一括ダウンロードができます

ソースコード

diff #
raw source code 

print((function (g, s)
	local h,l,r,f={},10,0,g(s)
	for i=1,#s do if h[f(i)]==nil then h[f(i)]={} end table.insert(h[f(i)],i) end
	for i=9,1,-1 do if h[i]~=nil then for _,v in ipairs(h[i]) do
		for j=1,v-1 do if i>f(j) and j<=l and v>r then l,r = j,v end end
	end end end
	return l>9 and s or s:sub(1,l-1)..s:sub(r,r)..s:sub(l+1,r-1)..s:sub(l,l)..s:sub(r+1)
end)(function (s)
	local h,f={},string.sub
	return function (n)
		if h[n]==nil then h[n]=tonumber(f(s,n,n)) end
		return h[n]
	end
end, io.stdin:read("*l")))
0