Строки. Присутствует ли в слове буквосочетание "МЫ" - Free Pascal

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

Задание 1. Написать программу, которая бы вводила с клавиатуры слово (прописными буквами) и определяла, присутствует ли в нем буквосочетание МЫ (использовать функцию Pos)

Решение задачи: «Строки. Присутствует ли в слове буквосочетание "МЫ"»

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

uses crt;
var s:string;
begin
write('s='); readln(s);
if pos('МЫ',s)<>0 then writeln('да') else writeln('нет');
readln;
end.

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

Используется модуль CRT (клавиатура/монитор) для ввода/вывода данных.
Объявлена переменная s типа строка.
Пользователю предлагается ввести строку.
С помощью функции pos() проверяется наличие буквосочетания МЫ в введенной строке.
Если буквосочетание найдено, выводится сообщение да, иначе выводится сообщение нет.
Программа ожидает нажатия клавиши для завершения работы.