Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Технологии > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 16.03.2014, 18:23   #1
Экспандер
Новичок
 
Регистрация: 16.03.2014
Сообщений: 3
Репутация: 10
По умолчанию Выяснить, сколько в тексте слов перевертышей?

Выяснить, сколько в тексте слов перевертышей. Данная задача по теме: строки. Паскаль АВС
Экспандер вне форума   Ответить с цитированием
Старый 16.03.2014, 18:26   #2
Vanta11a
Lawful Evil
Профессионал
 
Аватар для Vanta11a
 
Регистрация: 13.05.2008
Адрес: Навье царство
Сообщений: 1,208
Репутация: 193

icq: 5438392
По умолчанию

Ну и что? Самостоятельно что сделано?
__________________
Алгоритм - бесплатен. Поиск багов - бесплатен. Реализация алгоритма - за отдельную плату.
На форуме помогают советами и объясняют, а не пишут на халяву программы, лабы, курсачи и т.д. (c)
Vanta11a вне форума   Ответить с цитированием
Старый 16.03.2014, 19:09   #3
Экспандер
Новичок
 
Регистрация: 16.03.2014
Сообщений: 3
Репутация: 10
По умолчанию

Ничего, не знаю как прописать, что бы он нашел эти слова среди остальных.
Экспандер вне форума   Ответить с цитированием
Старый 16.03.2014, 19:10   #4
Vanta11a
Lawful Evil
Профессионал
 
Аватар для Vanta11a
 
Регистрация: 13.05.2008
Адрес: Навье царство
Сообщений: 1,208
Репутация: 193

icq: 5438392
По умолчанию

Ок. Покажи, как вводишь слова.
__________________
Алгоритм - бесплатен. Поиск багов - бесплатен. Реализация алгоритма - за отдельную плату.
На форуме помогают советами и объясняют, а не пишут на халяву программы, лабы, курсачи и т.д. (c)
Vanta11a вне форума   Ответить с цитированием
Старый 16.03.2014, 19:14   #5
Экспандер
Новичок
 
Регистрация: 16.03.2014
Сообщений: 3
Репутация: 10
По умолчанию

В смысле какие именно? Самолет Казак шалаш и т.д
Экспандер вне форума   Ответить с цитированием
Старый 16.03.2014, 19:28   #6
Stilet
Белик Виталий :)
Профессионал
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Адрес: Украина, Донецкая область, г. Краматорск
Сообщений: 57,840
Репутация: 6850
По умолчанию

Код просят показать ввода слов тебя )
А проверка на палиндром может выглядеть так:
Код:
Function Pali(s:String):Boolean;
var i:integer;
begin
 for i:=1 to Length(s) div 2 do 
  if s[i]<>s[Length(s)-i+1] then begin Result:=false; exit; end;
 Result:=True;
end;
Соответственно if Pali('Казак') then Это палиндром.
__________________
I'm learning to live...
Stilet вне форума   Ответить с цитированием
Старый 16.03.2014, 19:28   #7
Stilet
Белик Виталий :)
Профессионал
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Адрес: Украина, Донецкая область, г. Краматорск
Сообщений: 57,840
Репутация: 6850
По умолчанию

Код просят показать ввода слов тебя )
А проверка на палиндром может выглядеть так:
Код:
Function Pali(s:String):Boolean;
var i:integer;
begin
 for i:=1 to Length(s) div 2 do 
  if s[i]<>s[Length(s)-i+1] then begin Result:=false; exit; end;
 Result:=True;
end;
Соответственно if Pali('Казак') then Это палиндром.
__________________
I'm learning to live...
Stilet вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Текст, сколько слов в тексте? BigBen Помощь студентам 1 13.01.2011 20:40
Для каждого из слов указать, сколько раз оно встречается в тексте.(paskal) INZA Помощь студентам 1 14.12.2010 11:25
выяснить, встречается ли в данном тексте группа букв one; hidalgo Фриланс 7 19.01.2010 11:57
Составить в алфавитном порядке список всех слов, встречающихся в тексте, и количество этих слов. KAPAHDAW Паскаль 2 17.02.2009 02:19
Нахождение слов-палиндромов ("перевертышей") 1234 Помощь студентам 16 26.05.2008 19:01


04:14.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.