Введите название месяца. Если месяц "май", то вывести "Весна пришла!". В любом случае вывести "Я люблю весну!". Паскаль

program zz1;

var s:string; / / задаем переменную строкового типа

begin

write (' Введите название месяца ');

readln (s); / / вводим с клавиатуры заданную строку

if s = 'май' / / проверяем, если значение введенной строки равна "май", то

then write (' Весна пришла! ') / / выводим один ответ

else write (' Я люблю весну! '); / / иначе, выводим другой ответ

end.