![]() |
![]() |
acid_burn |
![]()
Сообщение
#1
|
Новичок ![]() Группа: Пользователи Сообщений: 13 Пол: Мужской Реальное имя: Серёга Репутация: ![]() ![]() ![]() |
Помогите пожалуйста решить такую задачку, что-то никак не соображу!
Код В пpоизвольном тексте найти и отпечатать все слова, заканчивающиеся буквой r. |
![]() ![]() |
Lapp |
![]()
Сообщение
#2
|
![]() Уникум ![]() ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: ![]() ![]() ![]() |
В подфоруме "Задачи" есть прикрепленная тема, называется типа "Все способы разбиения на слова". Зайди в Задачи - сразу ее увидишь.
После того, как текст разбит на слова, останется только пройтись по ним в цикле оператором типа такого: if w[Length(w)]='r' then WriteLn(w) -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
![]() ![]() |
![]() |
Текстовая версия | 6.09.2025 19:49 |