+ Ответить в теме
Показано с 1 по 8 из 8

Тема: Строки, Pascal

  1. #1
    VistBacK is on a distinguished road
    Регистрация
    19.09.2008
    Возраст
    26
    Сообщений
    9
    Вес репутации
    0

    По умолчанию Строки, Pascal

    Помогите пожалуйста решить одну задачку в Паскале...
    Определить сколько раз в заданном предложении встретится сочетание 2х первых букв. Напечатать исходный тексти число сочетаний.
    Заранее спасибо..

  2. По умолчанию

     
    Хотите избавиться от рекламы? Зарегистрируйтесь
  3. #2
    system architect somewhere will become famous soon enough somewhere will become famous soon enough Аватар для somewhere
    Регистрация
    31.08.2006
    Адрес
    71 RUS
    Возраст
    35
    Сообщений
    1,837
    Вес репутации
    17

    По умолчанию Re: Помогите пожалуйста решить одну задачку в Паскале...Заранее спасибо

    Код :
    1. if length(s)>3 then for x:=3 to length(s)-1 do if (s[x]=s[1]) and (s[x+1]=s[2]) then inc(count);
    2. writeln(s);
    3. writeln(count);
    It's a long way to the top if you wanna rock'n'roll

  4. #3
    senior developer airyashov is on a distinguished road
    Регистрация
    02.11.2007
    Возраст
    17
    Сообщений
    416
    Вес репутации
    11

    По умолчанию Re: Помогите пожалуйста решить одну задачку в Паскале...Заранее спасибо

    А если все строка одинаковые буквы, "AAAAAAAA....", то сколько сочетаний

  5. #4
    Moderator Куратор
    system architect
    Хыиуду has a spectacular aura about Хыиуду has a spectacular aura about
    Регистрация
    06.03.2005
    Адрес
    Москва
    Сообщений
    2,388
    Вес репутации
    19

    По умолчанию Re: Помогите пожалуйста решить одну задачку в Паскале...Заранее спасибо

    Соответственно, length-1
    Искусство программирования - заставить компьютер делать все то, что вам делать лень.
    Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.

  6. #5
    Moderator Куратор
    senior developer
    C_O_D_E is on a distinguished road
    Регистрация
    13.02.2008
    Адрес
    Беларусь. Орша
    Возраст
    28
    Сообщений
    293
    Вес репутации
    11

    По умолчанию Re: Помогите пожалуйста решить одну задачку в Паскале...Заранее спасибо

    Цитата Сообщение от Хыиуду Посмотреть сообщение
    Соответственно, length-1
    а я не согласна...
    если вся строчка одинаковых букв, то я бы решала через число сочетаний из N по M, где N - длина строки, а М -- 2.
    Если назначен специальный человек для контроля за чистотой исходной информации, то найдется изобратательный идиот, который придумает способ, чтобы неправильная информация прошла этот контроль.

  7. #6
    system architect somewhere will become famous soon enough somewhere will become famous soon enough Аватар для somewhere
    Регистрация
    31.08.2006
    Адрес
    71 RUS
    Возраст
    35
    Сообщений
    1,837
    Вес репутации
    17

    По умолчанию Re: Строки, Pascal

    В условии задачи не оговорено расположение букв: вподряд или хаотично. Если сказано что нужно сделать утюг, то не надо делать металлургический завод.
    It's a long way to the top if you wanna rock'n'roll

  8. #7
    senior developer Serge_Bliznykov is on a distinguished road
    Регистрация
    31.08.2007
    Сообщений
    366
    Вес репутации
    12

    По умолчанию Re: Строки, Pascal

    Цитата Сообщение от C_O_D_E
    я не согласна...
    если вся строчка одинаковых букв, то я бы решала через число сочетаний из N по M, где N - длина строки, а М -- 2.
    извините, но тут уж я с Вами категорически не согласен!!
    Если стоит вопрос "сколько раз ... встретится сочетание 2х ... букв"
    то нельзя сказать, что в слове, например, "корова" втретилось сочетание букв "кар" или букв "вор" или букв "кора" (это предлогаемые Вами сочетания..) - согласны?

  9. #8
    Moderator Куратор
    senior developer
    C_O_D_E is on a distinguished road
    Регистрация
    13.02.2008
    Адрес
    Беларусь. Орша
    Возраст
    28
    Сообщений
    293
    Вес репутации
    11

    По умолчанию Re: Строки, Pascal

    хм...
    я как всегда))
    Serge_Bliznykov, вы абсолютно правы.
    Хыиуду, извините) обшиблась.
    Если назначен специальный человек для контроля за чистотой исходной информации, то найдется изобратательный идиот, который придумает способ, чтобы неправильная информация прошла этот контроль.

+ Ответить в теме

Похожие темы

  1. Turbo Pascal. Списки, строки
    Здравствуйте, прошу помоч с задачками. Последнее время голова работать категорически отказывается. :( Задания: #1 Программа. Дана не пустая...
    от slavon-nv в разделе задачи на Паскале и Delphi
  2. Строки, Pascal
    Помогите Пожалуйста Решить Одну Задачку в Паскале!!!Буду очень благодарен!!! Вот собственно: Дана строка, состоящая из цифр и букв. Сформировать...
    от VistBacK в разделе задачи на Паскале и Delphi
  3. Pascal: ДОБАВЛЕНИЕ В НАЧАЛО СТРОКИ
    можно ли на прямую(т.е. без использования 2-го файла) добавить строку в начало ТЕКСТОВОГО файла????
    от itwork в разделе Delphi и Pascal
  4. [Pascal]Символьные переменыые и строки
    Дана строка символов.Удалить из неё каждое слово нечётной длины.Слова отделяются друг от друга группой пробелов.
    от maxg5 в разделе задачи на Паскале и Delphi
  5. [pascal]Символьные переменные и строки
    Помогите с задачкой: Вывести на экран следующий текст в виде ромба: http://s.foto.radikal.ru/0703/1c49ab651eac.jpg
    от maxg5 в разделе задачи на Паскале и Delphi

Ваши права

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