Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
кгр
0 / 0 / 0
Регистрация: 24.12.2012
Сообщений: 4
#1

Заменить окончание ING каждого слова, встречающегося в заданном предложении, на ED - Pascal

24.12.2012, 16:52. Просмотров 1022. Ответов 1
Метки нет (Все метки)

Заменить окончание ING каждого слова, встречающегося в заданном предложении, на ED.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.12.2012, 16:52
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Заменить окончание ING каждого слова, встречающегося в заданном предложении, на ED (Pascal):

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

В тех словах, которые оканчиваются сочетанием букв "ing", заменить это окончание на "ed" - Pascal
SOS!!! Чесно, не могу понять как это сделать, потому что ни когда не сталкивалась со строками и процедурами, так как они мне вообще не...

В заданном предложении указать слова в котором доля гласных а, е, о максимальна. - Pascal
Помогите решить задачи на строки: 1)в заданном предложении указать слова в котором доля гласных а, е, о максимальна. 2)дано название...

В заданном предложении найти самое короткое и самое длинное слова - Pascal
Напишите программу, которая в заданном предложении находит самое короткое и самое длинное слова. Выведите на экран введенный текст и...

Строки. Вторую букву каждого слова заменить на 'z'. +3 задачи. - Pascal
понимаю что не ново но не могли бы вы помочь... 1. Вторую букву каждого слова заменить на 'z'. 2. Из каждого слова удалить все...

Оставить в строке только один экземпляр каждого встречающегося символа - Pascal
есть прога и есть задание: Оставить в строке только один экземпляр каждого встречающегося символа program kiruxa; var ...

1
CodeR
Фрилансер
3379 / 2781 / 788
Регистрация: 08.02.2012
Сообщений: 6,625
Записей в блоге: 1
25.12.2012, 09:27 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Var s,s1,s2:string;
Begin
    write('Введите строку: ');readln(s);
    s:=s+' ';s2:='';
    While Pos(' ',s)>0 do
    Begin
      s1:=Copy(s,1,Pos(' ',s)-1);
      Delete(s,1,Pos(' ',s));
      if Copy(s1,Length(s1)-3+1,3)='ING' then
      Begin
        Delete(s1,Length(s1)-3+1,3);
        Insert('ED',s1,Length(s1)+1);
      End;
      s2:=s2+s1+' ';
    End;
    writeln('Полученная строка: ',s2);
    readln;
End.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.12.2012, 09:27
Привет! Вот еще темы с ответами:

Оставить в строке только один экземпляр каждого встречающегося символа - Pascal
С клавиатуры вводится строка. Оставить в строке только один экземпляр каждого встречающегося символа.

Известно, что слова в предложении отделены пробелами. Сколько слов в предложении - Pascal
Помогите пожалуйста сделать программу без использования глобальных переменных. program lab_7; uses crt; var s: string; l:...

В заданном предложении заменить все пары „ed“ на „ing“. Новый текст вывести на печать - PascalABC.NET
В заданном предложении заменить все пары „ed“ на „ing“. Новый текст вывести на печать.

Дан текстовый файл. Заменить окончание ing каждого слова, встречающегося в заданном предложении на ED и сохранить результат в новый файл. - C++
Всем вечер добрый. Хотелось бы, чтоб кто-нибудь помог с прогой. Её текст ниже: Дан текстовый файл. Заменить окончание ing каждого...


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

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

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