Problem

5 /8


Cari dalam rentetan

Theory Click to read/hide

Untuk mencari dalam rentetan dalam Pascal, gunakan kaedah pos().
Ia telah mengembalikan indeks kejadian pertama subrentetan dalam rentetan:
pos(originalString, smallString) - kelihatan dalam originalString smallString

Apabila subrentetan tidak ditemui, kaedah mengembalikan 0:

selamat datang := 'Hello dunia! Selamat tinggal dunia!'; index := pos(selamat datang, 'wor'); writeln(indeks); // 7 indeks := pos(selamat datang, 'matahari'); writeln(indeks); // 0
Sila ambil perhatian: kaedah ini tidak mencari bilangan kejadian, tetapi hanya menentukan sama ada terdapat subrentetan sedemikian dalam rentetan atau tidak .

Problem

Diberi rentetan di mana huruf h berlaku sekurang-kurangnya dua kali. Alih keluar kejadian pertama dan terakhir huruf h daripada rentetan ini, serta semua aksara di antaranya.

Input

Satu rentetan sedang dimasukkan.

Output

Paparkan jawapan kepada masalah.

Contoh

# Input Output
1 Di dalam lubang tanah itu hidup seekor hobbit Dalam tobbit