Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Milaya2015
1 / 1 / 3
Регистрация: 30.09.2015
Сообщений: 204
1

Преобразовать строку: заменить каждое слово "this" словом "that"

25.04.2017, 15:51. Просмотров 161. Ответов 8
Метки нет (Все метки)

Помогите пожалуйста составить программу и блок-схему.
Преобразовать строку, заменяя каждое слово “this” словом “that”.

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

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

Пожалуйста, составьте программу, которая из слов"СТРАХ","БЕЛКА","ЦЫПЛЁНОК" получает слово "СТОЛБЕЦ"
Пожалуйста, составьте программу, которая из слов"СТРАХ","БЕЛКА","ЦЫПЛЁНОК"...

Ввести один из символов "Y" или "n". При вводе "Y" вывести на экран слово "Да", а при вводе "n" слово "нет"
1.Ввести один из символов "Y" или "n". При вводе "Y" вывести на экран слово...

Заменить в последовательности каждую группу "child" словом "children"
Даны натуральное число n, символы S1,... Sn. Заменить в последовательности...

Даны текстовый файл "F" и строка "S". Получить все строки файла "F", содержащие в качестве фрагмента строку "S".
Плиз помогите написать прогу: Даны текстовый файл "F" и строка "S". Получить...

Даны строки а="вариант",b= "Высоко", с = "макароны". Получить слово "соковарка"
4 .Даны строки а="вариант",b= "Высоко", с = "макароны". Получить слово...

8
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4195 / 3053 / 3778
Регистрация: 05.06.2014
Сообщений: 15,319
25.04.2017, 18:36 2
Преобразовать строку, заменяя каждое слово this словом the
0
Puporev
Модератор
55403 / 42538 / 29391
Регистрация: 18.05.2008
Сообщений: 100,621
25.04.2017, 18:40 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var s:string;
    i:integer;
begin
writeln('Введите строку из слов, написанных латиницей, разделенных пробелам и содержащую слова this');
readln(s);
for i:=length(s)-3 downto 1 do
if(copy(s,i,4)='this')and((i=1)or(s[i-1]=' '))and((i+3=length(s))or(s[i+4]=' '))
then
 begin
  delete(s,i+2,2);
  insert('at',s,i+2);
 end;
write(s)
end.
0
Milaya2015
1 / 1 / 3
Регистрация: 30.09.2015
Сообщений: 204
26.04.2017, 09:05  [ТС] 4
А как будет выглядеть блок-схема?
0
Puporev
Модератор
55403 / 42538 / 29391
Регистрация: 18.05.2008
Сообщений: 100,621
26.04.2017, 11:29 5
Примерно так.
0
Миниатюры
Преобразовать строку: заменить каждое слово "this" словом "that"  
Milaya2015
1 / 1 / 3
Регистрация: 30.09.2015
Сообщений: 204
26.04.2017, 15:50  [ТС] 6
А что значит for i:=length(s)-3 downto 1 do?
0
Puporev
Модератор
55403 / 42538 / 29391
Регистрация: 18.05.2008
Сообщений: 100,621
26.04.2017, 15:52 7
от четвертого с конца символа до первого.
0
Milaya2015
1 / 1 / 3
Регистрация: 30.09.2015
Сообщений: 204
26.04.2017, 16:25  [ТС] 8
А что это значит? Просто в блоке решений так много написано
if(copy(s,i,4)='this')and((i=1)or(s[i-1]=' '))and((i+3=length(s))or(s[i+4]=' '))
delete(s,i+2,2);
insert('at',s,i+2);
0
Puporev
Модератор
55403 / 42538 / 29391
Регистрация: 18.05.2008
Сообщений: 100,621
26.04.2017, 16:38 9
Pascal
1
2
3
4
5
6
7
8
for i:=length(s)-3 downto 1 do
//если (4 символа=this) и ((они первые в строке) или (перед ними пробел)) и ((они последние)или (за ними пробел))
if(copy(s,i,4)='this')and((i=1)or(s[i-1]=' '))and((i+3=length(s))or(s[i+4]=' '))
then//тогда
 begin
  delete(s,i+2,2);//удаляем 3 и 4 символы(is)
  insert('at',s,i+2);//вставляем на их место at
 end;
Добавлено через 1 минуту
Научитесь считать до четырех, потом лезьте в программирование.
0
26.04.2017, 16:38
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.04.2017, 16:38

Вывести текст файла, заменив цифры от 0 до 9 на слова "ноль", "один"..."девять", начиная каждое предложение с новой строки
Написать программу, которая считывает текст из файла и выводит его на экран,...

Заменить букву "А" на "КО" и подсчитать общее количество букв "Ф" и "В"
Заменить букву "А" на "КО" и подсчитать общее кол-во букв "Ф" и "В" . и ...

Ввести возраст человека (от 1 до 150 лет) и вывести его вместе с последующим словом "год", "года" или "лет"
Здравствуйте! Помогите решить задачу! Ввести возраст человека (от 1 до 150...


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

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

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