1. Заголовок темы должен быть информативным. В противном случае тема удаляется ... 
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения. 
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали! 
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| NightPaladin | 
                        
			
			  
			
				 Сообщение
					#1				
			 
		 | 
	
        	
        		![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 67 Пол: Мужской Репутация:    0           	 | 
       
			
			 Вот - очень интересует решение даной задачи. 
			
			Буквы назовем “соседями”, если они входят в какую-либо пятерку подряд идущих букв русского алфавита, например ”КЛМНО”. Назовем слово «дружественным», если слово составлено из “соседей” (буквы могут входить в слово много раз, некоторые могут отсутствовать). Например, ГАВ, БАБА - «дружественные». Дана строка, в которой слова разделены пробелами, вывести все дружественные слова. Пример: Входные данные: Выходные данные: РАЗ ДВА ТРИ ЧЕТЫРЕ ПЯТЬ ДВА АБВГД ГДЕ ЕЖ АБВГД ГДЕ ЕЖ -------------------- На горе лежит дискета 
					
		У неё испорчен boot Через дырочку в конверте Её вирусы грызут  | 
	
 NightPaladin   Работа со строками   27.11.2004 20:34
 
 volvo   NightPaladin 
Можно предложить следующее: напиши ф…   27.11.2004 20:59
 
 NightPaladin   Спосибо большое сейчас попробую написать, а то у м…   28.11.2004 0:17
 
 NightPaladin   volvo или просто добрые люди посмотрите чё не так …   28.11.2004 20:01
 
 volvo   Попробуй вот так:
Uses Crt;
Type
  TWords =…   28.11.2004 20:33
 
 NightPaladin   Заработало :no: , от всей души говорю VOLVO - ТЫ Л…   28.11.2004 20:50![]() ![]()  | 
	
 
  | 
		Текстовая версия | 4.11.2025 16:27 |