Из текста удалить слова, начинающиеся и оканчивающиеся на одну и ту же букву.(Паскаль)

Ответы:
Яна Куприянова
03-03-2019 09:23

//Pascal ABC.NET v3.1 сборка 1217 Var s,s1:string; i:integer; begin readln(s); var ars:=s.ToWords; for i:=0 to ars.length-1 do if lowcase(ars[i][1])<>lowcase(ars[i][length(ars[1])]) then s1:=s1+ars[i]+; writeln(s1); end. Пример ввода: Мама окно рама Пример вывода: Мама рама

Картинка с текстом вопроса от пользователя ИРИНА ВЫШНЕВЕЦЬКАЯ

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Из текста удалить слова, начинающиеся и оканчивающиеся на одну и ту же букву.(Паскаль) » от пользователя ИРИНА ВЫШНЕВЕЦЬКАЯ в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!