В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
katakoval
katakoval
16.06.2020 14:37 •  Информатика

Дана последовательность содержащая от 1 до 30 слов, в каждом из которых от 1 до 5 строчных латинских букв,между соседними словами-запятая, за последним словом- точка. вывести эту же последовательность слов, но в обратном порядке. pascal abc

Показать ответ
Ответ:
stepman228
stepman228
10.01.2024 18:11
Привет, давай разберем этот вопрос!

В начале задачи сказано, что у нас есть последовательность слов. Давай посмотрим на эту последовательность слов:

"pascal, abc."

Мы видим, что после каждого слова есть запятая, а после последнего слова стоит точка. Наша задача - вывести эту последовательность слов в обратном порядке.

Для решения этой задачи, нам необходимо разделить строку на отдельные слова, используя запятые в качестве разделителей.

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

Давай напишем код для этого решения на языке Паскаль:

```pascal
program ReverseWords;
var
inputString, reversedString: String;
words: array of String;
i: Integer;
begin
inputString := 'pascal, abc.';
reversedString := '';

// Разделяем строку на отдельные слова и добавляем их в массив
words := inputString.Split([',', ' ']);

// Проходим по списку слов в обратном порядке и добавляем их в новую строку
for i := Length(words) - 1 downto 0 do
begin
// Если это последнее слово, то добавляем точку вместо запятой
if i = 0 then
reversedString := reversedString + words[i] + '.'
else
reversedString := reversedString + words[i] + ', ';
end;

// Выводим полученную строку в обратном порядке
writeln(reversedString);

// Ждем, пока пользователь нажмет Enter, чтобы закрыть программу
readln;
end.
```

Теперь, когда мы запустим эту программу, она разделит строку "pascal, abc." на отдельные слова "pascal" и "abc.", затем перевернет их и выведет обратно в виде "abc., pascal".

Надеюсь, это решение помогло тебе понять, как перевернуть последовательность слов! Если у тебя возникли дополнительные вопросы, не стесняйся задавать. Я всегда готов помочь!
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота