Вычеркнуть из строки A символы, встречающиеся в строке B, оставшиеся добавить в строку B.

@сипа · Регистрация: 08.01.2013

Author24 — интернет-сервис помощи студентам

Даны две строки. Вычеркнуть из строки A символы, встречающиеся в троке B, оставшиеся добавить в строку B.

@CodeR · 19.01.2013, 15:53

Pascal

Var A,B:string;
    i:byte;
Begin
    write('строка A = ');readln(a);
    write('строка B = ');readln(b);
    For i:=Length(a) downto 1 do
     While Pos(a[i],b)>0 do
      Delete(a,i,1);
    B:=b+a;
    writeln('Полученная строка = ',b);
    readln;
end.

@сипа · 19.01.2013, 17:31 **[ТС]**

Спасибо тебе)))

Добавлено через 23 минуты
помоги с новым заданием))) я создал тему на новое задание))) Plizzz)))

@сипа 0 / 0 / 0 Регистрация: 08.01.2013 Сообщений: 15
		1
	Вычеркнуть из строки A символы, встречающиеся в строке B, оставшиеся добавить в строку B. 19.01.2013, 15:39. Показов 2955. Ответов 2 Метки нет (Все метки) Даны две строки. Вычеркнуть из строки A символы, встречающиеся в троке B, оставшиеся добавить в строку B. 0

@сипа 0 / 0 / 0 Регистрация: 08.01.2013 Сообщений: 15
	19.01.2013, 17:31 [ТС]	3
	Спасибо тебе))) Добавлено через 23 минуты помоги с новым заданием))) я создал тему на новое задание))) Plizzz))) 0

Вычеркнуть из строки A символы, встречающиеся в строке B, оставшиеся добавить в строку B.

Решение