"Напечатать слова, содержащие заданную букву. " в pascal.

Ну стравнивайте буква с индексом в стринг
if slovo [ i ]='БУКВА' then есть буква
разделители слов пробелы. т. е. слово это то что ограничено пробелами тоже такой же принцип