Problem

5 /8


جستجو در یک رشته

Theory Click to read/hide

برای جستجو در یک رشته در پاسکال، از روش pos() استفاده کنید.
ایندکس اولین وقوع زیررشته در رشته را برمی گرداند:
pos(originalString, smallString) - در originalString smallString

به نظر می رسد

وقتی رشته فرعی پیدا نشد، روش 0 را برمی گرداند:

<پیش> خوش آمدید := 'سلام دنیا! خداحافظ دنیا!'; index := pos(خوش آمدید، 'wor'); writeln(index); // 7 index := pos(خوش آمدید، 'sun'); writeln(index); // 0
لطفاً توجه داشته باشید: این روش‌ها به دنبال تعداد رخدادها نیستند، بلکه فقط تعیین می‌کنند که آیا چنین زیررشته‌ای در رشته وجود دارد یا خیر. .

Problem

رشته ای را در نظر می گیریم که حرف h حداقل دو بار در آن اتفاق می افتد. اولین و آخرین تکرار حرف h و همچنین تمام کاراکترهای بین آنها را از این رشته حذف کنید.

ورودی

یک رشته در حال وارد شدن است.

خروجی

پاسخ مشکل را نمایش دهید.

نمونه‌ها

<سر> <بدن>
# ورودی خروجی
1 در سوراخ زمین یک هابیت زندگی می کرد در توبیت