Question

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

Answer 1

Ответ:

язык программирования любой?

пишу на Python:

s = str(input())

s = sorted(s[:len(s)-1].split(', '))

for word in s:

print(word, ' ', end='')

Pascal:

var s, copy_s, word_s:string;

i, n, count:integer;

a:array of string ;

begin

count:=0;

write('Введите перечисление слов через запятую без пробелов, в конце поставьте точку: ');

readln(s);

copy_s:= s;

while pos(',', copy_s) > 0 do begin

n:= pos(',', copy_s);

delete(copy_s, n, 1);

count:=count+1;

end;

count:= count + 1;

SetLength(a, count);

for i:=1 to count-1 do begin

n:= pos(',', s);

word_s:= copy(s, 1, n-1);

delete(s, 1, n);

a[i]:=word_s;

end;

word_s:= copy(s, 1, length(s)-1);

a[count]:= word_s;

for i:=1 to count-1 do

if a[i] > a[i+1] then begin

word_s:=a[i];

a[i]:=a[i+1];

a[i+1]:=word_s;

end;

for i:=1 to count do

writeln(a[i]);

end.

Answer 2

PascalABC.NET

Ответ:

• begin
• ReadString.ToWords(' ',',','.').Order.Print
• end.

Пример работы:

Answer 3

Для решения данной задачи можно использовать следующий алгоритм:

1. Считать входную последовательность.
2. Разбить строку на слова, используя запятые и точку в качестве разделителей.
3. Удалить лишние пробелы вокруг каждого слова.
4. Отсортировать полученный список слов в алфавитном порядке.
5. Вывести отсортированный список слов.

Вот пример кода на языке Python, реализующий описанный алгоритм:

pythonCopy code
sequence = input("Введите последовательность слов: ")

# Разбиваем строку на слова и удаляем лишние пробелы
words = [word.strip() for word in sequence.replace(',', ' ').replace('.', '').split()]

# Сортируем список слов в алфавитном порядке
sorted_words = sorted(words)

# Выводим отсортированный список слов
for word in sorted_words:
    print(word)

Пожалуйста, введите последовательность слов, и программа выведет их в алфавитном порядке.