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

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

begin
  ReadlnString.ToWords.Count.Println
end.

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