Что значат и для чего служат данные строчки ( подчеркнул )

1) s := Trim(s)

Trim() - убирает пробелы с концов строки В данном случае записывает в s ее же, только без пробелов на концах.

2) p := Pos(".", s) - 1

Pos() - возвращает позицию елемента который указан в первом агрументе функции, в строке , который указан во втором аргументе функции

Сдесь Pos() - возвращает  позицию "." (точки) в строке s. В данном случае ищем точку в строке чтобы понять где закончилось предложение, чтобы использовать это значение в следуйщем цикле for для переборки символов.  -1 нужен исключить точку, тоесть записать в p длинну предложения без точки.

Объяснение: