Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
2 / 2 / 0
Регистрация: 04.12.2009
Сообщений: 95
1

Алгоритмы обработки строк

09.12.2009, 13:55. Показов 1162. Ответов 7
Метки нет (Все метки)

Здравствуйте. Помогите решить еще одну задачу, буду очень благодарен… осталось всего 3 сделать, и все сдано, 2 сам доделаю, а одну не как не осилю.. Помогите плизз.
В заданной строке символов, содержащей русские буквы и пробелы заменить окончания слов -ого на –огого

Добавлено через 18 минут
в дэльфи это нужно сделать с формой...
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.12.2009, 13:55
Ответы с готовыми решениями:

Алгоритмы обработки строк
Ввести строку символов, если ее длина >10 - удалить все цифры. Подскажите как решить

Алгоритмы обработки строк
Дана строка символов. Подсчитать, сколько в ней слов, начинающихся с буквы «а». кто знает как...

Алгоритмы обработки слов
Определить какой процент слов в тексте содержат удвоенную согласную. Помогите плиииз)

Алгоритмы обработки символьной информации
Помогите дорешать задачу по Delphi. Не могу написать то, что подчеркнуто в задании. Задание:...

7
115 / 114 / 22
Регистрация: 29.08.2009
Сообщений: 174
09.12.2009, 14:35 2
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
function ReplaceSub(str, sub1, sub2: string): string;
var
  aPos: Integer;
  rslt: string;
begin
  aPos := Pos(sub1, str);
  rslt := '';
  while (aPos <> 0) do
  begin
    rslt := rslt + Copy(str, 1, aPos - 1) + sub2;
    Delete(str, 1, aPos + Length(sub1) - 1);
    aPos := Pos(sub1, str);
  end;
  Result := rslt + str;
end;
 
procedure TForm1.Button1Click(Sender: TObject);
var
  str:string;
begin
  str:=Edit1.Text;
  Edit1.Text:=ReplaceSub(str,'îãî ','îãîãî ');
end;
1
2 / 2 / 0
Регистрация: 04.12.2009
Сообщений: 95
09.12.2009, 15:54  [ТС] 3
conn, сделал все что у Вас, но почему то не работает, запускаетса но действий не каких...
Скажите, как можно сделать что бы вводилось в едит и віводилось в едит 2?
0
0 / 0 / 0
Регистрация: 09.12.2009
Сообщений: 3
09.12.2009, 16:07 4
Добрый вечер! надо в дэльфи код написать код:
Дано предложение. Определить, все ли буквы в нем различны.

Я что-то не могу сообразить как это сделать...помогите пожалуйста
0
2 / 2 / 0
Регистрация: 04.12.2009
Сообщений: 95
09.12.2009, 16:43  [ТС] 5
Dudeskin15, ьпочему в моей теме ? Свою создайте..
0
2 / 2 / 0
Регистрация: 04.12.2009
Сообщений: 95
09.12.2009, 21:32  [ТС] 6
Помогите плиззз....
0
115 / 114 / 22
Регистрация: 29.08.2009
Сообщений: 174
10.12.2009, 00:23 7
как можно сделать что бы вводилось в едит и віводилось в едит 2
Delphi
1
2
str:=Edit1.Text;
Edit2.Text:=ReplaceSub(str,'ого ','огого ');
1
2 / 2 / 0
Регистрация: 04.12.2009
Сообщений: 95
10.12.2009, 07:45  [ТС] 8
conn, спасибо!!!! Респект)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.12.2009, 07:45

Алгоритмы обработки одномерных массивов
Дан одномерный целочисленный массив. Найти сумму элементов массива, расположенных между первым и...

Алгоритмы обработки двумерных массивов.
Здравствуйте, помогите решить 3 задачи, буду очень Вам благодарен. Нужно сделать в делфи с формой,...

Алгоритмы обработки двумерных массивов
Определить наименьшую из сумм элементов каждой строки матрицы (i=1,...,5, j=1,…3). Обьясните как...

Алгоритмы обработки двумерных массивов
Задан двухмерный массив целых чисел A размером N на M. Найти: произведение элементов, расположенных...

Алгоритмы обработки одномерных массивов
Вычислить произведение отрицательных элементов массива Yi (i=1, ... 15) . стоящих на нечетных...

Алгоритмы обработки одномерных массивов
Здраствуйте, помогите решить задачу: произведение элементов массива, расположенных между...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru