Определить, верно ли, что самое длинное слово предложения имеет длину больше 10 символов - PascalABC.NET
Формулировка задачи:
Дано предложение .Верно ли что его самое длинное слово имеет больше 10 символов?
Решение задачи: «Определить, верно ли, что самое длинное слово предложения имеет длину больше 10 символов»
textual
Листинг программы
begin
writeln(ReadString('Введите предложение').Split(' ,.?!'.ToCharArray()).Select(st -> Length(st)).Max() > 10 ? 'Правда' : 'Неправда')
end.
Объяснение кода листинга программы
В данном коде происходит следующее:
- Ввод предложения с помощью функции ReadString.
- Разделение предложения на отдельные слова с помощью метода Split.
- Определение длины каждого слова с помощью метода Length.
- Нахождение максимальной длины слова с помощью функции Max.
- Сравнение максимальной длины слова с 10 символами.
- Вывод результата сравнения с помощью оператора if.
- Вывод слова
ПравдаилиНеправдав зависимости от результата сравнения.