結果
| 問題 |
No.1811 EQUIV Ten
|
| コンテスト | |
| ユーザー |
👑 |
| 提出日時 | 2022-10-13 13:01:05 |
| 言語 | Lua (LuaJit 2.1.1734355927) |
| 結果 |
AC
|
| 実行時間 | 52 ms / 2,000 ms |
| コード長 | 553 bytes |
| コンパイル時間 | 179 ms |
| コンパイル使用メモリ | 7,068 KB |
| 実行使用メモリ | 6,944 KB |
| 最終ジャッジ日時 | 2024-06-26 11:59:30 |
| 合計ジャッジ時間 | 1,695 ms |
|
ジャッジサーバーID (参考情報) |
judge4 / judge1 |
(要ログイン)
| ファイルパターン | 結果 |
|---|---|
| sample | AC * 3 |
| other | AC * 33 |
ソースコード
local mod = 1000000007
local function badd(x, y) return (x + y) % mod end
local n = io.read("*n")
local t, dst = {}, {}
for i = 1, 16 do
t[i] = 0
end
t[1] = 1
local tot = 1
for i = 1, n do
for j = 1, 16 do dst[j] = 0 end
for j = 1, 16 do
local v = ((j - 1) * 2 + 0) % 16 + 1
dst[v] = badd(dst[v], t[j])
v = ((j - 1) * 2 + 1) % 16 + 1
dst[v] = badd(dst[v], t[j])
end
for j = 1, 16 do t[j] = dst[j] end
t[11] = 0
tot = badd(tot, tot)
end
local ans = 0
for i = 1, 16 do
ans = badd(ans, t[i])
end
print(badd(tot, mod - ans))