結果

問題 No.430 文字列検索
ユーザー 👑 obakyanobakyan
提出日時 2019-07-07 17:21:43
言語 Lua
(LuaJit 2.1.1696795921)
結果
TLE  
(最新)
AC  
(最初)
実行時間 -
コード長 514 bytes
コンパイル時間 353 ms
コンパイル使用メモリ 5,632 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2024-11-10 00:26:24
合計ジャッジ時間 14,192 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge1
このコードへのチャレンジ
（要ログイン）

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
5,248 KB
testcase_01 AC 187 ms
5,248 KB
testcase_02 TLE -
testcase_03 AC 1,106 ms
5,248 KB
testcase_04 AC 2 ms
5,248 KB
testcase_05 AC 2 ms
5,248 KB
testcase_06 AC 1 ms
5,248 KB
testcase_07 AC 1 ms
5,248 KB
testcase_08 AC 2 ms
5,248 KB
testcase_09 AC 3 ms
5,248 KB
testcase_10 AC 4 ms
5,248 KB
testcase_11 AC 762 ms
5,248 KB
testcase_12 AC 772 ms
5,248 KB
testcase_13 AC 759 ms
5,248 KB
testcase_14 AC 1,313 ms
5,248 KB
testcase_15 AC 1,548 ms
5,248 KB
testcase_16 TLE -
testcase_17 TLE -
権限があれば一括ダウンロードができます

ソースコード

diff # 

local s = io.read()
local n = #s
local m = io.read("*n", "*l")
local cnt = 0
for i = 1, m do
  local t = io.read()
  local pass = 1
  local tlen = #t
  for df = 1, tlen - 1 do
    local lim = tlen - df
    for j = 1, lim do
      if t:sub(j, j) ~= t:sub(j + df, j + df) then
        pass = df + 1
      else
        break
      end
    end
    if pass ~= df + 1 then break end
  end

  local p = 1
  while p do
    p = s:find(t, p)
    if p then
      cnt = cnt + 1
      p = p + pass
    end
  end
end
print(cnt)
0