Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 10.04.2012
Сообщений: 8
1

Даны 3 предложения. Найти совпадающие слова в предложении и среди них самое длинное слово

01.12.2013, 13:50. Показов 1085. Ответов 4
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Даны 3 предложения. Найти совпадающие слова в предложении и среди них самое длинное слово.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.12.2013, 13:50
Ответы с готовыми решениями:

Ввести последовательность предложений. Найти самое длинное слово среди них и вывести предложение с этим словом
Ввести последовательность предложений. Найти самое длинное слово среди них и вывести предложение с...

Найти самое длинное слово и самое коротное слово в предложении
Найти самое длинное слово и самое коротное слово (длиной не менее введенного числа) в предложении.

В заданном предложении найти самое короткое и самое длинное слово
Строка вводится с клавиатуры. Нужно выполнить задание, не применяя функций типа strtok и прочих,...

В заданном предложении найти самое короткое и самое длинное слово
Делаю все строго по гайду, но после ввода строки вылетает "exit code = 201". Пишу в free pascal'е....

4
3218 / 967 / 223
Регистрация: 29.05.2010
Сообщений: 2,087
01.12.2013, 14:52 2
Цитата Сообщение от kvippi Посмотреть сообщение
аны 3 предложения. Найти совпадающие слова в предложении и среди них самое длинное слово
Непонятно:
1. искать совпадении только в каждом предложении
2. длинное слово во всех предложениях или в каждом, или в совпадающих словах?
0
0 / 0 / 0
Регистрация: 10.04.2012
Сообщений: 8
02.12.2013, 00:37  [ТС] 3
1. искать совпадения в каждом предложении
2. длинное слово во всех предложениях
0
6944 / 2849 / 548
Регистрация: 19.10.2012
Сообщений: 8,723
02.12.2013, 11:33 4
Условия задачи не однозначны...
0
3218 / 967 / 223
Регистрация: 29.05.2010
Сообщений: 2,087
02.12.2013, 20:18 5
Ну по длинному слову попробую помочь:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub test()
    Dim s$
    s = "Äàíû 3 ïðåäëîæåíèÿ. Íàéòè ñîâïàäàþùèå ñëîâà â ïðåäëîæåíèè è ñðåäè íèõ ñàìîå äëèííîå ñëîâî."
    MsgBox "Ñàìîå äëèííîå ñëîâî - " & MaxLenWord(s)
End Sub
 
Function MaxLenWord(Predl As String) As String
    Dim s, i&
    Predl = Replace(Application.Trim(Predl), ".", "")
    Predl = Replace(Predl, ",", "")
    s = Split(Predl)
    For i = 0 To UBound(s)
        If Len(s(i)) > Len(MaxLenWord) Then MaxLenWord = s(i)
    Next
End Function
0
02.12.2013, 20:18
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.12.2013, 20:18
Помогаю со студенческими работами здесь

В заданном предложении найти самое длинное и самое короткое слово
создать программу,которая в заданном предложении находит самое длинное и самое короткое слово

В заданном предложении найти самое короткое и самое длинное слово
1. Создать вектор М, содержащий количество отрицательных элементов каждого столбца матрицы z(3,4)....

Найти самое длинное и самое короткое слово в предложении
Составить и отладить программу, которая выполняет следующие действия. В заданном тексте из...

В заданном предложении найти самое короткое и самое длинное слово и УКАЗАТЬ ПОЗИЦИИ, с которых они начинаются
В заданном предложении найти самое короткое и самое длинное слово и указать позиции, с которых они...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru