結果

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

ソースコード

diff #
raw source code 

print((function (g, s)
	local h,l,r,t,f={},10,0,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 and i>=t then l,r,t = j,v,i 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