Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
Marat6233
0 / 0 / 0
Регистрация: 10.03.2010
Сообщений: 58
1

Дана строка S. Вывести на экран первое слово, которое начинается с заданной буквы

17.06.2010, 17:44. Просмотров 1319. Ответов 3
Метки нет (Все метки)

Дана строка S. Вывести на экран первое слово, которое начинается с заданной буквы
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.06.2010, 17:44
Ответы с готовыми решениями:

Дана строка S. Вывести на экран самое длинное слово из строки S.
Дана строка S. Вывести на экран самое длинное слово из строки S. Помогите пожалуйста написать код!

Дана строка, содержащая текст, заканчивающийся точкой. Вывести на экран слова, содержащие три буквы
Дана строка, содержащая текст, заканчивающийся точкой. Вывести на экран слова, содержащие три буквы.

Вывести первое слово предложения, которое начинается с большой буквы
preg_match('~.?~',$string,$matches); echo $matches; не хочет работать, не знаю почему

Дана строка. Вывести на экран слова, внутри которых имеется хотя бы одна буква, с которой слово начинается. [Turbo prolog][есть решение]
predicates ...

Определить, сколько слов начинается с той же буквы, с которой начинается первое слово
Добрый день, помогите пожалуйста решить множества: Вводится строка. Определить, сколько слов...

3
Honor
10 / 9 / 1
Регистрация: 26.08.2009
Сообщений: 68
17.06.2010, 17:46 2
ну и что тут сложного?
1.цикл + выделяем слово
2.проверяем равна ли его первая буква заданой букве
3.выводим
0
Inadequate
Retired
7713 / 2545 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
17.06.2010, 17:51 3
Marat6233, а что именно тебе тут непонятно ? Тут достаточно просто нужно просто перебирать строку посимвольно отделяяя слова от разделителей. Т.е. примерно такой код будет
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
...
const
  dividers = [' ', '.', ',', ';', ':'];
...
  tmp := '';
  for i := 1 to Length(s) do 
  begin
    if not (s[i] in dividers) then
      tmp := tmp + s[i];
    if ((s[i] in dividers) or (i = Length(s))) and (tmp <> '') then
      if tmp[1] = findChr then
        break
      else
        tmp := ''; 
  end;
...
0
Honor
10 / 9 / 1
Регистрация: 26.08.2009
Сообщений: 68
17.06.2010, 17:52 4
можно и так хотя перебирая слова тоже вполне нормально работала бы)
0
17.06.2010, 17:52
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.06.2010, 17:52

Дана текстовая строка Найти какое-нибудь слово, начинающееся с заданной буквы.
Программа не работает,нужно оформить пред условие,не могу понять как .Если можете,помогите Дана...

Дана строка,если слова упорядочены вывести "yes", иначе вывести первое слово, нарушающее алфавитный порядок
Дана строка. Если слова в ней упорядочены по алфавиту, то вывести 'yes', иначе вывести первое...

Выведите слово, идущее за словом которое начинается с буквы «t»
Нужно написать код ассеблера Заранее спасибо) С меня +реп


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru