Автор Тема: Каждое слово one заменить на three  (Прочитано 1918 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн ilyha93

  • Новичок
  • *
  • Сообщений: 3
    • Просмотр профиля
Каждое слово one заменить на three
« : 26 Декабря 2011, 18:52:10 »
ЗАДАНИЕ:
 Каждое слово one заменить на three... ( Нужно использовать только length и setlength вместо delete pos insert) .... люди подскажите как это сделать?????

 program z5123;
 var T:string;
 i:integer;
 zc,zn:string;
 begin
 writeln('input T');
 readln(T);
 zc:='one';
 zn:='three';
 while pos(zc,T)>0 do
 begin
 i:=pos(zc,T);
 delete(T,i,length(zc));
 insert(zn,T,i);
 end;
 writeln(' new text');
 writeln(T);
 readln
 end.

Оффлайн Selyd

  • Старожил
  • ****
  • Сообщений: 408
    • Просмотр профиля
Re: Каждое слово one заменить на three
« Ответ #1 : 26 Декабря 2011, 22:55:09 »
1. Ввели текст - Согласен
2. Назначили что менять на что - Согласен
3. Определить длину текста, сколько символов.
4. Если начало текста или в тексте после пробела - набираем слово с 3 символов, другие варианты - уходим до следующего пробела
5. Если что надо - замена, но надо подвинуть хвост на 2 позиции (three длинее one)
6. Проверяем конец текста. (Не забыть, что длина может измениться)

Оффлайн ilyha93

  • Новичок
  • *
  • Сообщений: 3
    • Просмотр профиля
Re: Каждое слово one заменить на three
« Ответ #2 : 27 Декабря 2011, 00:30:04 »
а можете если не сложно написать код просто мне так тяжело понять и сама суть что нужно использовать length и setlength  вместо begin insert pos а как это сделать????  код который выше он рабочий я проверял .. НО СУТЬ В ТОМ ЧТО НУЖНО ИСПОЛЬЗОВАТЬ друие команды..а как их вставить я затрудняюсь

 

Программа на языке С, сравнить слова и вывести самое длинное слово

Автор non_fitto

Ответов: 1
Просмотров: 3267
Последний ответ 17 Января 2011, 18:29:57
от testtest
Помогите решить задачку на C. Удалить слово с заданным номером.

Автор Natafka

Ответов: 0
Просмотров: 2763
Последний ответ 22 Июня 2010, 20:26:39
от Natafka
Дан текстовый файл со строками. Найти повторяющиеся слова и заменить

Автор bifshtex

Ответов: 7
Просмотров: 5233
Последний ответ 08 Января 2010, 21:10:33
от InfStudent
матрица, найти строку и заменить, паскаль

Автор bifshtex

Ответов: 3
Просмотров: 4578
Последний ответ 16 Февраля 2010, 23:17:10
от bifshtex