Даны два предложения в которых имеется буква S, найти в каком из них эта буква имеет большой порядковый номер - Pascal

Формулировка задачи:

Даны два предложения в которых имеется буква

Найти в каком из них эта буква имеет большой порядковый номер. При счете от начала предложения. Если в предложении имеется несколько таких букв то нужно учитывать последнюю из них. Решив задачу определить функции в модуле.

Паскаль. С помощью модуля и функции.

(Заранее спасибо!)

Решение задачи: «Даны два предложения в которых имеется буква S, найти в каком из них эта буква имеет большой порядковый номер»

Листинг программы

uses
    MyModule;
var
    s1, s2: String;
begin
    Write('Input 1 string: '); ReadLn(s1);
    Write('Input 2 string: '); ReadLn(s2);
    Answer(FindPosition(s1), FindPosition(s2));
end.

Объяснение кода листинга программы

Создается переменная s1 типа String для хранения первого предложения.
Создается переменная s2 типа String для хранения второго предложения.
Пользователю выводится приглашение Input 1 string:, после чего введенное им предложение сохраняется в переменной s1.
Пользователю выводится приглашение Input 2 string:, после чего введенное им предложение сохраняется в переменной s2.
Вызывается функция FindPosition из модуля MyModule для поиска позиции буквы S в предложении, сохраненном в переменной s1.
Вызывается функция FindPosition из модуля MyModule для поиска позиции буквы S в предложении, сохраненном в переменной s2.
Полученные позиции передаются в функцию Answer для определения, в каком из предложений буква S имеет больший порядковый номер.