|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
В строке найти символ с одинаковыми подстроками.
Привет всем. Помогите написать программу.
Дана строка , можно ли в ней найти символ , обладающий следующими свойством: перед ним стоит подстрока , составленная из тех же символов , что и подстрока состоящая после данного символа. Получаеться что есть строка например: курШкур. В ней есть символ "Ш" у которого подстрока "кур" одинаковая со подстрокой после символа "Ш" то-есть "кур". Но может быть и так: руршуйпз то есть символ между котороми одинаковые подстроки "у". Вот такая вот проблемка. |
#2
|
||||
|
||||
В цыкле тебе нужно делать эту проверку
Код:
if copy(s,i,j)=copy(s,i+2,j) then writeln('Your char is ',copy(s,i+1,1)); |
#3
|
|||
|
|||
Большое спасибо всё сделал
|