Автор Тема: Нужна помощь  (Прочитано 3479 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Наська :)

  • Новичок
  • *
  • Сообщений: 5
    • Просмотр профиля
Нужна помощь
« : 03 Ноября 2010, 22:31:54 »
Помогите,плизз. решить задачку в паскале. Необходимо определить, является ли слово перевертышем( типа шалаш) Очень надо

Оффлайн Данила

  • Глобальный модератор
  • *****
  • Сообщений: 1657
  • Математик-экстрасенс
    • Просмотр профиля
Re: Нужна помощь
« Ответ #1 : 04 Ноября 2010, 00:35:20 »
в чем проблема? сравнивайте 1ую букву с последней если равны , то 2ую с предпоследней и тд,пока либо не дойдете до серидины,либо не попадутся неравные буквы
Просьба не кидать мне в ЛС Ваши задания...создаем тему,пишем свое задание,наработки\идеи...полностью и нахаляву ничего не решаю

Вам в помощь:
∫ ¼ ½ ¾ ⅓ ⅔ ⅛ ⅜ ⅝ ⅞ ² ³ ± ~ ‰ ∞ √ ∑ ∆ ℮ ∩ ≡ ≤ ≥ ≈ ∩

Оффлайн Наська :)

  • Новичок
  • *
  • Сообщений: 5
    • Просмотр профиля
Re: Нужна помощь
« Ответ #2 : 04 Ноября 2010, 10:57:41 »
все, я нашла решение, пасибки
« Последнее редактирование: 04 Ноября 2010, 11:32:20 от Наська :) »

Оффлайн Наська :)

  • Новичок
  • *
  • Сообщений: 5
    • Просмотр профиля
Re: Нужна помощь
« Ответ #3 : 04 Ноября 2010, 11:36:08 »
так?
Program nastya;
var s:string;

n,i,x: integer ;

begin
read(s);
i:=1;
n:=length(s);


for x:=0 to (n-1) do
begin
if s[i+x]<>s[n-x]
then writeln('нет')
else writeln('да');

 end;
 
 end.
но тока из-за цикла да и нет выводится по количеству букв(

Оффлайн Данила

  • Глобальный модератор
  • *****
  • Сообщений: 1657
  • Математик-экстрасенс
    • Просмотр профиля
Re: Нужна помощь
« Ответ #4 : 05 Ноября 2010, 00:09:27 »
ну естественно.

цикл нужно делать до n/2 ,зачем вам пробегать слово с 2ух сторон целиком
во 2ых,нужно лишь накапливать счетчик,пока не закончите цикл,а дальше если счетчик = n ,то да, иначе нет
Просьба не кидать мне в ЛС Ваши задания...создаем тему,пишем свое задание,наработки\идеи...полностью и нахаляву ничего не решаю

Вам в помощь:
∫ ¼ ½ ¾ ⅓ ⅔ ⅛ ⅜ ⅝ ⅞ ² ³ ± ~ ‰ ∞ √ ∑ ∆ ℮ ∩ ≡ ≤ ≥ ≈ ∩

Оффлайн Наська :)

  • Новичок
  • *
  • Сообщений: 5
    • Просмотр профиля
Re: Нужна помощь
« Ответ #5 : 05 Ноября 2010, 17:28:07 »
пасибки ;)

 

Maple помощь с непростой функцией в частном виде

Автор Tilesto

Ответов: 0
Просмотров: 8602
Последний ответ 14 Мая 2015, 14:41:43
от Tilesto
Помощь в решении простых задач на Pascal'е

Автор berkut_174

Ответов: 19
Просмотров: 7755
Последний ответ 26 Июня 2011, 18:10:18
от berkut_174
Помощь с учебной литературой

Автор PandaPivovar

Ответов: 3
Просмотров: 5329
Последний ответ 25 Ноября 2009, 00:34:11
от PandaPivovar
матрицы, нужна помошь

Автор lelia222

Ответов: 28
Просмотров: 10707
Последний ответ 08 Октября 2009, 16:27:01
от Данила
Нужна консультация

Автор Вишня

Ответов: 14
Просмотров: 5017
Последний ответ 05 Мая 2010, 19:04:39
от InfStudent