считывание и запись в файл
Code
begin
assign(input, <имя первого файла>);
rewrite(input);
assign(output, <имя второго файла>);
reset(output);
readln(...);
...
writeln(...);
close(input);
close(output);
end;
как примерно решать задачу: делаешь массив слов, считываешь слова, потом каждое слово проверяешь со всеми
как проверять: в одном из слов перемещаешь последний символ вперед и смотришь, схожи ли эти 2 слова, только перед этим я думаю еще надо проверку сделать по количеству символов в слове, ибо слова с разным кол-вом букв не имеет смысл проверять