418531 ภาคต้น 2552/โจทย์ปัญหาอัลกอริทึมแบบตะกละ I/เฉลยข้อ 2

อัลกอริทึม

ให้สตริงใน $S'\,$ จับคู่กับสตริงใน $S\,$ ตัวแรกสุดที่เหมือนกัน ถ้าสตริงทุกตัวใน $S'\,$ ถูกจับคู่ได้หมดให้ตอบ "ใช่" ไม่เช่นั้นให้ตอบ "ไม่ใช่"

ให้ $i\,$ เป็นตัวแปรที่ชี้ไปยังสตริงที่กำลังพิจารณาในสตริง $S\,$

ให้ $j\,$ เป็นตัวแปรที่ชี้ไปยังสตริงที่กำลังพิจารณาในสตริง $S'\,$

<geshi lang="c"> FindSubString(S,m,S^',n)

   {
    j = 1
    for i = 1 to m do
    {
     if S[i] = S'[j] then
         j = j + 1
    }
    if j > n then
         return 1
    else
         return 0
   }

</geshi>