結果

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

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1 ms
6,816 KB
testcase_01 AC 201 ms
6,944 KB
testcase_02 TLE -
testcase_03 AC 1,203 ms
6,940 KB
testcase_04 AC 1 ms
6,944 KB
testcase_05 AC 1 ms
6,940 KB
testcase_06 AC 2 ms
6,944 KB
testcase_07 AC 1 ms
6,940 KB
testcase_08 AC 3 ms
6,940 KB
testcase_09 AC 2 ms
6,944 KB
testcase_10 AC 4 ms
6,944 KB
testcase_11 AC 814 ms
6,944 KB
testcase_12 AC 816 ms
6,940 KB
testcase_13 AC 812 ms
6,940 KB
testcase_14 AC 1,433 ms
6,944 KB
testcase_15 AC 1,677 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
    local isok = true
    for j = 1, lim do
      if t:sub(j, j) ~= t:sub(j + df, j + df) then
        isok = false
        break
      end
    end
    if isok then break else pass = df + 1 end
  end
  -- print(i, pass)

  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