Решите задачу в Паскале
Есть строка из произвольного количества слов, которая начинается не с пробела и заканчивается не пробелом, между словами один пробел. Найти и вывести на экран слово минимальной длины(если таких слов несколько, вывести первое по порядку)
Пример:
Введите строку: asa qwerty u zzz qq
Результат: u – слово мин.длины (1 имвол)
Answers & Comments
// PascalABC.NET
begin
ReadString.ToWords.MinBy(p -> Length(p)).Print
end.