結果
問題 | No.233 めぐるはめぐる (3) |
ユーザー |
👑 |
提出日時 | 2022-11-06 21:02:14 |
言語 | Lua (LuaJit 2.1.1734355927) |
結果 |
AC
|
実行時間 | 831 ms / 1,000 ms |
コード長 | 1,322 bytes |
コンパイル時間 | 186 ms |
コンパイル使用メモリ | 6,940 KB |
実行使用メモリ | 23,496 KB |
最終ジャッジ日時 | 2024-07-20 08:36:17 |
合計ジャッジ時間 | 6,404 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 11 |
ソースコード
local mfl, mce = math.floor, math.ceillocal n = io.read("*n", "*l")local t = {}for i = 1, n dolocal s = io.read()t[s] = trueendlocal a = {"i", "a", "a", "e", "u", "u"}local b = {"n", "b", "m", "g", "r"}local function getpattern(n, patall, idx)local used = {}local retary = {}local div = patallfor i = 1, n do used[i] = false endfor i = n, 1, -1 dodiv = mfl(div / i)local v_idx = mfl(idx / div)idx = idx % divlocal tmp_idx = 0for j = 1, n doif not used[j] thenif tmp_idx == v_idx thentable.insert(retary, j)used[j] = truebreakelsetmp_idx = tmp_idx + 1endendendendreturn retaryendfor i = 0, 719 dolocal pa = getpattern(6, 720, i)for j = 0, 119 dolocal pb = getpattern(5, 120, j)for k = 0, 5 dolocal z = {}local apos = 1if k == 0 thentable.insert(z, a[pa[apos]])apos = apos + 1endfor l = 1, 5 dotable.insert(z, b[pb[l]])table.insert(z, a[pa[apos]])apos = apos + 1if k == l thentable.insert(z, a[pa[apos]])apos = apos + 1endendz = table.concat(z)if not t[z] then print(z) os.exit() endendendendprint("NO")