Считываешь слово.
дальше два цикла первый от 1 до длины слова
второй от 2 до длины слова
в них
если
copy (имя переменной которая отвечает за слово, число первого цикла, 1) = copy все то же самое, но второго цикла, то delete (слово, число второго цикла, 1)
вот и все