Ввести строку символов st1( саша шла по шоссе) вывести на экран количество введенных слов(пробелов)

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

begin
  ReadlnString('Введите строку:').ToWords.Length.Println
end.