Найти номер позиции с которой в заданной строке в первый раз встретится некоторо введенное слово применяемые функции poz length

Предыдущий
вопрос Следующий
вопрос

Для нахождения номера позиции, с которой в заданной строке впервые встретится определенное слово, можно воспользоваться функцией pos. Данная функция возвращает позицию, с которой начинается первое вхождение подстроки в строку.

Пример использования функции pos:

program FindWordPosition;
var
str: string;
word: string;
position: integer;
begin
str := 'Hello, this is a sample sentence.';
word := 'sample';
position := pos(word, str);
if position > 0 then
writeln('Слово "', word, '" найдено в строке на позиции: ', position)
else
writeln('Слово "', word, '" не найдено в строке.');
end.

Запустив данный код, мы найдем позицию, с которой в строке "Hello, this is a sample sentence." впервые встречается слово "sample".

Функция pos возвращает 0, если слово не найдено в строке.