Problem

5 /8


在字符串中搜索

Theory Click to read/hide

要在 Pascal 中搜索字符串,请使用 pos() 方法。
它返回字符串中子字符串第一次出现的索引:
pos(originalString, smallString) - 查找 originalString smallString

当没有找到子串时,该方法返回0:

<前> 欢迎 := '世界,您好!再见世界!' index := pos(欢迎, 'wor'); writeln(索引); // 7 索引:= pos(欢迎,“太阳”); writeln(索引); // 0
请注意:这些方法不查找出现的次数,而只是判断字符串中是否有这样的子串.

Problem

给定一个字符串,其中字母 h 至少出现两次。从此字符串中删除第一个和最后一个出现的字母 h,以及它们之间的所有字符。

输入

正在输入一个字符串。

输出

显示问题的答案。

示例

<头> <日># <正文>
输入 输出
1 在地上的洞里住着一个霍比特人 在托比特