:выведите кол-во слов в которых есть определённая буква. пример : ввод: а (буква) папа ел кашу (строка) вывод : 2

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadlnString('Введите текст:').ToLower.ToWords;
  var c:=ReadlnChar('Введите искомую букву').ToLower;
  Writeln('Слов с этой буквой: ',a.Where(w->w.Contains(c)).Count)
end.

Пример
Введите текст: А роза упала на лапу Азора
Введите искомую букву а
Слов с этой буквой: 6