Как найти самое длинное слово в строке в паскале
Так же ищут: длина, слово, блок-схема
Задача.
Дан текст. Определите длину самого короткого и самого длинного слов. (Текст – это набор слов, разделенных пробелами и знаками препинания).
Итак, опишу в прозе порядок действий по решению задачи.
Для начала мы должны получить строку с клавиатуры. Когда у нас есть строка – инициализируем переменные. Представим что на данный момент максимальная длина слова равна нулю, а минимальная 50. Такие цифры выбраны дабы первое попавшееся слово стало максимальным и минимальным по длине одновременно. Так же зададим множество символов (неких стоп символов) таких как пробел и знаки препинания, которые означают конец слова.
Далее будем перебирать строку от первого до последнего символа.
Если символ не входит в множество стопсимволов, и счетчик не больше длинны строки, то пробуем задать номер стартового символа слова. «Пробуем» в данном случае означает, что мы проверяем не задан ли уже старт на данный момент.
Если же символ в стопсимволах, т.е. слово закончилось, то пытаемся посчитать длину. В данном случае «пытаемся» означает, что мы проверяем задан ли старт слова. Если задан, то длина равна текущее значение счетчика минус старт.
Далее если длина больше максимума, то максимум равен длине, если длина меньше минимума, то минимум равен длине.
Не забываем обнулить старт и двигаемся дальше по циклу. В конце выводим минимум и максимум на экран.
Реализация на Turbo Pascal 7:
Блок-схема:
Блок-схема алгоритма нахождения максимальной и минимальной длин слов
Блоксхема создана с помощью редактора http://www.gliffy.com
Запись опубликована 12.03.2011 в 11:34 пп и размещена в рубрике Студентам. Вы можете следить за обсуждением этой записи с помощью ленты RSS 2.0. Комментарии и уведомления сейчас закрыты.
Как найти самое длинное слово в строке в паскале
Регистрация на форуме тут, о проблемах пишите сюда — alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите восстановить пароль
| Поиск по форуму |
| Расширенный поиск |
| К странице. |
Проверяйте =)
___________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.
Валлидол,
первое. в данной задаче массив слов СОВСЕМ не нужен. Что найти максимальную длину, достаточно получать длину одного, текущего слова.
второе.
в программе есть ошибка. Если строка не заканчивается знаком разделителем, то ваш алгоритм НЕ УВИДИТ последнего слова.
попробуйте:
Задачи по Pascal. Найти самое длинное слово предложения
Условие задачи : Найти самое длинное слово заданного предложения и вывести его длину.
Сложность : средняя.
Как мы будем решать эту задачу.
Для начала создадим каркас нашей программы.
Стоит сказать что в программе Delphi лучше не делать там нужен какой то модуль который найти трудновато , так что качайте Turbo или FreePascal.
Решать задачу мы будем следующим образом . Мы будем считывать каждый нажатый нами символ с клавиатуры , затем заносить его в переменную и потом в зависимости от условия , что то с ним делать .
Переменные типа string нужны для того что бы в одну из них занести самое длинное слово а в другую мы будем заносить букву за буквой и затем получив слово проверять его на длину.
В переменную типа char мы будем заносить нашу букву , а затем прибавлять в переменной sl и таким образом у нас получиться слово.
В переменные типа integer мы будем заносить количество символов в слове .
Дальше мы задаём цикл repeat until , чтобы считывать символы с клавиатуры и будем вводить до тех пор пока не поставим точку .