Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
Arinochka
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 2
1

Извлечение слов и их распределение на категории: из русс. букв, из англ. букв, из русс. и англ. букв, слова схожие по начертанию букв с русс и англ.

14.05.2011, 18:36. Просмотров 1624. Ответов 4
Метки нет (Все метки)

В тексте содержатся русские и англ слова. разделить все слова на 3 списка: русские слова, англ слова, слова, происхождения которых нельзя определить однозначно. Например 'шутка' - русское слово, 'computer' - англ слово, 'cop' слово которое может быть русским и англ по составу букв.
Даже подобную найти не могу, что бы написать. Напишите пожалуйста как примерно это должно быть. Спасибо всем заранее
 Комментарий модератора 
Название темы я поменял на более соответствующее содержанию задачи.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.05.2011, 18:36
Ответы с готовыми решениями:

Автомобильные номера состоят из 1,2, или 3 букв и 4 цифр. используется 30 букв, найти число таких букв
Автомобильные номера состоят из 1,2, или 3 букв и 4 цифр. используется 30 букв,...

Генератор случайных символ и букв(англ)
Помогите сделать генератор случайных символ и букв(англ) вот пример того что я...

Вводится слово из n- различных букв (n<10) получить все возможные слова из S букв этого слова (s<=n)
и вывести их в одном из каких нибудь компонентов

Совпадение букв двух слов.Перестановкой букв
Задание выглядит так: Ввести два слова.Выяснить можно ли получить второе слово...

ВВести строку из слов на англ.языке (букву строчные). НУжно
Помогите пожалуйста ! ВВести строку из слов на англ.языке (букву строчные)....

4
i8085
1970 / 1364 / 262
Регистрация: 11.09.2009
Сообщений: 4,792
15.05.2011, 06:13 2
Arinochka, в коде ASCII русские и английские буквы имеют разную кодировку. Так что если в слове только буквы английского алфавита, или только русского - понятно куда его девать. Если в слове встречаются и те и другие - в третий список.

Вот тут есть, как выделять слова:
Вывести на экран порядковый номер слова максимальной длины
Список слов. Delphi
Поиск слова
Подсчёт слов в тексте.

а это практически ваше задание:
Нужно вывести текст, содержащий фразы только на английском языке...

Пользуйтесь поиском по форуму. Таких заданий было много, те, что я привёл - даже не самые лучшие.
0
Novice9
0 / 0 / 0
Регистрация: 12.05.2011
Сообщений: 1
15.05.2011, 15:37 3
Напишите программку что бы текст ''Memo1'' делился на русские 'Memo2'' и на агнгл 'Memo3'' через запятую.. у меня почему то в 'Memo3'' каша получается
0
Arinochka
0 / 0 / 0
Регистрация: 11.05.2011
Сообщений: 2
15.05.2011, 16:47 4
мне надо что бы слова содержащие буквы 'q,w,r,g, итд' переносились в один столбец, а слова с буквами 'г, п, з, я,' в другой, ну а слова где не встр этих букв идут в 3 столбик. Это можно как нибуть реализовать?
0
Mawrat
12833 / 5741 / 1700
Регистрация: 19.09.2009
Сообщений: 8,807
15.05.2011, 18:52 5
Arinochka, Novice9, предлагаю такой код:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
(*
Для проверки:
ром1, pom2, роm3.
нод1, nod2, ноd3.
*)
 
procedure TForm1.Button1Click(Sender: TObject);
const
  //Разделители слов.
  D = ['.', ',', ':', ';', '!', '?', '-', ' ', #9, #10, #13];
  //Множество русских букв.
  Dr = ['А'..'П', 'Р'..'Я', 'Ё', 'а'..'п', 'р'..'я', 'ё'];
  //Множество английских букв.
  De = ['A'..'z'];
  //Множество букв, похожих по начертанию и на русские и на английские.
  Dre = [
    //Русские.
    'А', 'В', 'Е', 'К', 'М', 'Н', 'О', 'П', 'Р', 'С', 'Т', 'У', 'Х',
    'а',      'е', 'к', 'м', 'н', 'о', 'п', 'р', 'с', 'т', 'у', 'х',
    //Английские.
    'A', 'B', 'C', 'E', 'H', 'K', 'M',      'O', 'P', 'T', 'X', 'Y',
    'a',      'c', 'e',      'k', 'm', 'n', 'o', 'p',      'x', 'y'
  ];
  //Множество букв, которые по начертанию могут быть только русскими
  //или только английскими.
  Dnre = Dr + De - Dre;
var
  S, sW : String;
  i, Len, Pos1 : Integer;
  //Флаги:
  IsR, IsE, IsNre : Boolean;
begin
  //Исходный текст.
  S := Memo1.Text;
 
  //Очистка списков.
  //Слова, состоящие только из русских букв.
  Memo2.Clear;
  //Слова, состоящие только из английских букв.
  Memo3.Clear;
  //Слова, которые содержат и русские и английские буквы.
  Memo4.Clear;
  //Слова, которые по начертанию букв можно отнести и к русским и к английским.
  Memo5.Clear;
 
  Len := Length(S);
  Pos1 := 0;
  //Сброс флагов.
  IsR := False;
  IsE := False;
  IsNre := False;
  for i := 1 to Len do begin
    //Пропускаем разделители.
    if S[i] in D then Continue;
    //Анализируем очередную букву слова.
    if S[i] in Dr then
      IsR := True
    else if S[i] in De then
      IsE := True
    ;
    if S[i] in Dnre then IsNre := True;
    //Отслеживаем начало слова.
    if (i = 1) or (S[i - 1] in D) then Pos1 := i;
    //Отслеживаем конец слова.
    if (i = Len) or (S[i + 1] in D) then begin
      //Извлекаем слово.
      sW := Copy(S, Pos1, i - Pos1 + 1);
 
      //Анализируем слово.
 
      //Слово содержит в своём составе и русские и английские буквы.
      if IsR and IsE then
        Memo4.Lines.Add(sW)
      //Слово содержит в своём составе только русские буквы.
      else if IsR then
        Memo2.Lines.Add(sW)
      //Слово содержит в своём составе только английские буквы.
      else if IsE then
        Memo3.Lines.Add(sW)
      ;
      //Слово содержит в своём составе буквы, похожие по начертанию
      //и на русские и на английские.
      if not IsNre then Memo5.Lines.Add(sW);
 
      //Сброс флагов.
      IsR := False;
      IsE := False;
      IsNre := False;
    end;
  end;
end;
Дальше уже можете доработать под особенности своих задач.
0
Миниатюры
Извлечение слов и их распределение на категории: из русс. букв, из англ. букв, из русс. и англ. букв, слова схожие по начертанию букв с русс и англ.  
Вложения
Тип файла: rar ExtractAndProcWords.rar (166.0 Кб, 27 просмотров)
15.05.2011, 18:52
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.05.2011, 18:52

Составить программу подсчета и сравнения количества букв «А» и букв «О» с учетом регистра
Составить программу подсчета и сравнения количества букв «А» и букв «О» с...

Дан текст из строчных русских букв. Подсчитать количество гласных букв в тексте
Дан текст из строчных русских букв. Подсчитать количество гласных букв в тексте.

Количество букв в поле edit (именно букв)
Всем привет! Скажите, как проверить поле edit на буквы? Именно на буквы. То...


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

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

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