VBNet - Форум - Является ли палиндромом

Вопрос: Является ли палиндромом Добавлено: 03.11.11 13:32

Автор вопроса: Luchia

дана строка символов.Проверить является ли она палиндромом.т.е. читается ли она слева на право так же как справа на лево(А роза упала на стол Ароза)
Ответить

Ответы Всего ответов: 11

Номер ответа: 1 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| Цитата \| #1	Добавлено: 03.11.11 13:41
	Public Function IsPalindrome(s As String) Return s.Equals(new String(s.Reverse().ToArray()), StringComparer.CurrentCultureIgnoreCase) End Function Ответить

Номер ответа: 2 Автор ответа: Luchia Вопросов: 1 Ответов: 1	Профиль \| Цитата \| #2	Добавлено: 03.11.11 13:42
	не понятно! Ответить

Номер ответа: 3 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| Цитата \| #3	Добавлено: 03.11.11 13:44
	Без выделения памяти под new String: Public Function IsPalindrome(s As String) Return Enumerable.Range(1, s.Length).All(Function (T) s(T).Equals(s(s.Length - T))) End Function Ответить

Номер ответа: 4 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| Цитата \| #4	Добавлено: 03.11.11 13:44
	че не понятно! Ответить

Номер ответа: 5 Автор ответа: EROS Вопросов: 58 Ответов: 4255	Профиль \| Цитата \| #5	Добавлено: 03.11.11 21:25
	AgentFire, следующим этапом твоей эволюции будет переход на C# Ответить

Номер ответа: 6 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| Цитата \| #6	Добавлено: 04.11.11 12:35
	я уже полгода на нем Ответить

Номер ответа: 7 Автор ответа: EROS Вопросов: 58 Ответов: 4255	Профиль \| Цитата \| #7	Добавлено: 04.11.11 12:39
	AgentFire пишет: я уже полгода на нем Но судя по твоим постам ты все еще используешь богопротивное наречие )))) Ответить

Номер ответа: 8 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| Цитата \| #8	Добавлено: 04.11.11 14:12
	нет, это я лично для негов вспомнил vb. видишь - в первом примере new с маленькой буквы?) этот момент я упустил Ответить

Номер ответа: 9 Автор ответа: andrey ICQ: 305986093 Вопросов: 3 Ответов: 41	Профиль \| Цитата \| #9	Добавлено: 13.12.11 11:45
	AgentFire Может я, как-то не так использую твой пример, но, что-то у меня не получается. А вот так нормально: А роза упала на лапу Азора Public Function IsPalindrome(ByVal s As String) Return Strings.Replace(s.ToUpper, " ", "") = Strings.Replace(Strings.StrReverse(s.ToUpper), " ", "") End Function Ответить

Номер ответа: 10 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| Цитата \| #10	Добавлено: 13.12.11 16:59
	ты пробелы затираешь Ответить

Номер ответа: 11 Автор ответа: andrey ICQ: 305986093 Вопросов: 3 Ответов: 41	Профиль \| Цитата \| #11	Добавлено: 15.12.11 09:01
	Ну да, иначе не покатит ). Ответить

Страница: 1 |