Написать программу, которая посчитает количество слов в строке, слова могут быть отделены...

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

begin
ReadlnString.ToWords.Count.Println
end.

Пример
А роза упала на лапу Азора
6