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

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

Вернуться   Форум программистов > C/C++ программирование > Общие вопросы C/C++
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 03.04.2013, 00:02   #1
3Doleg
Пользователь
 
Регистрация: 03.10.2012
Сообщений: 67
По умолчанию во входном тексте заменить слово

Всем добрый вечер)
у меня есть програма на паскале, помогите переделать на C (не C++)
програма во входном тексте заменяет слово
вот готовая програма на паскале:

Код:
uses crt;
const rz=[' ',',','.',';',':','!','?','''','"'];
var s,s1,sp,sz:string;
    n,m,i,p:byte;
begin  clrscr;
writeln('vvedite stroky');
readln(s);
writeln('vvedite slovo dlya poiska');
readln(sp);
n:=length(sp);
writeln('vvedite slovo dlya zamenu');
readln(sz);
m:=length(sz);
i:=1;
p:=0;
while i<=length(s)-n+1 do
if (copy(s,i,n)=sp)and((i=1)or(s[i-1] in rz))and((i+n-1=length(s))or(s[i+n] in rz)) then
 begin
  p:=1;
  delete(s,i,n);
  insert(sz,s,i);
  i:=i+length(s1);
 end
else
 i:=i+1;
if p=0 then write('Slova ',sp,' v stroce nety')
else write(s);
readkey;
end.
вот код, который удалось переделать:
Код:
#include <stdio.h>
#include <conio.h>
#include <string.h>
#include <stdlib.h>

main()
{
	int rz[] = {' ',',','.',';',':','!','?','''','"'};
	char s, s1, sp, sz;
	int n, m, i, p;

	system("cls");
	printf("vvedite stroky\n");
	gets(s);
	printf("vvedite slovo dlya pouska: \n");
	gets(sp);
	n = strlen(sp);
	printf("vvedite slovo dlya zamenu: \n");
	gets(sz);
	m = strlen(sz);

	i = 1; p = 0;
	while (i < strlen(s) - n + 1)
	{
	.......



	.......
	else 
	i++;
	if(p = 0) printf("Slova %c v stroke nety!\n");
	else
	printf("%c",s);

getch();
}
или напишите свою)
Заранее спасибо)

Последний раз редактировалось 3Doleg; 03.04.2013 в 23:55.
3Doleg вне форума Ответить с цитированием
Старый 08.04.2013, 17:36   #2
3Doleg
Пользователь
 
Регистрация: 03.10.2012
Сообщений: 67
По умолчанию

незнаю как организовать ф-ции insert, delete, copy..
3Doleg вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль. Процедуры. Заменить в тексте одно слово на другое JosH7 Помощь студентам 3 23.09.2012 22:06
В исходном тексте все символы «,» заменить на слово «запятая» Mashaaaaa Паскаль, Turbo Pascal, PascalABC.NET 7 22.05.2012 14:12
Заменить заданное слово в тексте, находящемся в заданном файле, на другое слово (С++) Lapochka Помощь студентам 6 01.12.2011 14:05
Найти слово в тексте ДмитрийРэй Помощь студентам 8 23.04.2011 19:49