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

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

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

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку