Дано строку символов s, длиной n.Слова разделены пробелами, в конце точка. Найти слова в которых одинаковые первые три символа. Помогите плз а то у меня уже
Добавлено (22.01.2012, 19:17) --------------------------------------------- Блн народ дайте хоть алгоритм решения.
Сообщение отредактировал baks - Суббота, 21.01.2012, 06:21
baks, Алгоритм прост. Я бы сделал так: 1) Получил первые 3 символа строки (s1 = Copy(s, 1, 3);) 2) Сделал бы поиск этой подстроки далее в строке через функцию Pos. Она возвращает позицию вхождения x. Возьми на один символ левее (x-1) и сравни с пробелом. Если истина, значит эти три символа встречаются в начале какого-либо слова. 3) Поиском первого пробела, нашёл бы второе слово. Если подстрока из 3 первых символо другая - повторил бы операцию 2. Ну думаю понятно? Кстати, поиск делать в цикле с временной копией строки s, чтобы оригинал сохранился. Поддерживаю также проект сообщество молодых сисадминов
