Дана последовательность, содержащая от 1 до 30 слов; вывести слова в алфавитном порядке - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Дана последовательность, содержащая от 1 до 30 слов, в каждом из которых от 1 до 5 прописных латинских букв; между соседними словами – запятая, за последним – точка. Написать все слова в алфавитном порядке

Решение задачи: «Дана последовательность, содержащая от 1 до 30 слов; вывести слова в алфавитном порядке»

textual
Листинг программы
begin
  ReadLnString.ToWords(' ,.'.ToArray).OrderBy(word -> word).Print(', '); WriteLn('.');
end.

Объяснение кода листинга программы

В данном коде на языке PascalABC.Net происходит следующее:

  1. ReadLnString.ToWords(' ,.'.ToArray) - считывание строки из консоли и разделение её на слова. В данном случае используется разделитель ,..
  2. OrderBy(word -> word) - сортировка полученной последовательности слов в алфавитном порядке.
  3. Print(', ') - вывод отсортированных слов через запятую и пробел.
  4. WriteLn('.') - вывод точки в конце строки. Список переменных и их значений в данном коде:
    • ReadLnString - результат считывания строки из консоли.
    • ToWords - метод, преобразующий строку в последовательность слов.
    • '.'.ToArray - преобразование строки в массив символов, содержащих точки.
    • OrderBy - метод, сортирующий элементы последовательности.
    • word - текущий элемент последовательности.
    • Print - метод, выводящий элементы последовательности на экран.
    • WriteLn - метод, выводящий строку на экран и переходящий на новую строку.

Оцени полезность:

7   голосов , оценка 3.857 из 5
Похожие ответы