結果

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

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
6,816 KB
testcase_01 AC 209 ms
6,940 KB
testcase_02 TLE -
testcase_03 AC 1,200 ms
6,944 KB
testcase_04 AC 1 ms
6,940 KB
testcase_05 AC 1 ms
6,940 KB
testcase_06 AC 1 ms
6,940 KB
testcase_07 AC 1 ms
6,944 KB
testcase_08 AC 2 ms
6,944 KB
testcase_09 AC 2 ms
6,940 KB
testcase_10 AC 4 ms
6,940 KB
testcase_11 AC 811 ms
6,944 KB
testcase_12 AC 812 ms
6,940 KB
testcase_13 AC 810 ms
6,940 KB
testcase_14 AC 1,424 ms
6,940 KB
testcase_15 AC 1,667 ms
6,944 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