Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.11.2010, 00:18   #1
patisson74
Пользователь
 
Регистрация: 11.11.2009
Сообщений: 17
Вопрос Строки, (С)

Есть решение задачи на Паскале, нужно переделать решение на Си...
Дан текст. Группы символов, разделенные одним или несколькими пробелами называются словами. В тех словах, которые заканчиваются соединением букв “ing”, заменить это окончание на “ed”.
листинг:
Код:
program  ing_to_ed;
uses  crt;     { Подключаем модуль, содержащий функцию очистки экрана}
var   st: string;     { Объявляем переменные}
         i: integer;
BEGIN
clrscr;     { Очищаем  экран }
          writeln (' Вводим произвольные слова на английском языке ' , st);  
          readln(st);
          if pos('ing ',st)=0  then         {Проверяем, есть ли  «ing» в тексте}
    begin
            writeln (' Слов с данным окончанием нет!!! ');
            readln;
            exit;
    end;
          while  pos('ing ',st)>0 do     { Заменяем «ing»  на   «ed»}
   begin
           i:=pos('ing ',st);
           delete(st,i,4);
           insert('ed ',st,i);
     end;
           if (pos('ing',st)) = (length(st)-2) then     {Проверяем , есть ли «ing» в последнем слове}
     begin
           delete (st, length (st)-2,3);
           insert ('ed', st, length (st)+1);
     end;
           writeln(st);     { Выводим измененный текст на экран }
           readln;
END.
Мученик - заочник
patisson74 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание пустой строки и копирование в неё содержимое предыдущей строки Gvaridos Microsoft Office Excel 2 29.10.2010 13:33
Дбавление новой строки, после строки с подходящими параметрами RailOS Microsoft Office Excel 5 18.08.2010 10:12
Определять максимальную длину той части строки s, которая не содержит символы из строки s1. Александе еть я Общие вопросы C/C++ 5 13.04.2010 20:54
Перенести символа с начала строки в место перед запятой этой же строки. Zhiltsov Microsoft Office Excel 4 05.06.2009 13:10
считать из файла две строки, вывести на экран символы первой строки, которые отсутствуют во второй gotex Помощь студентам 4 08.05.2008 02:27