ПОМОГИТЕ ПОЖАЛУЙСТА)

96. Дано предложение, в котором имеются одна буква «с» и одна буква «т». Определить, какая из них встречается раньше (при просмотре слова слева направо). ЭТО ПАСКАЛЬ, СТРОКИ)

vars:string;beginwrite ('Введите предложение: ');readln(s);if pos('с',s)>pos('т',s)   then writeln ('Буква «т» встречается раньше')  else writeln('Буква «с» встречается  раньше');end.