Удалите из второй строки все символы, которые встречаются в первой строке, и поместите их в третью строку

@ANTIJULJA · Регистрация: 30.05.2012

1. Удалите из второй строки все символы, которые встречаются в первой строке, и поместите их в третью строку.

Добавлено через 5 минут
ну народ пожалуйстааа

@DaskOFF · 31.05.2012, 17:32

Добавлено через 5 минут
ну народ пожалуйстааа

вы думаете вам тут за 2 минуты все должны написать?

будет время попозже напишу

Добавлено через 4 часа 29 минут
пожалуйста
1)

Pascal

uses crt;
var
    s1,s2,s3:string;
    i,k:word;
    mn:set of char;
    
begin
clrscr;
s3:=''; k:=0;mn:=[];
write('Введите 1 строку: ');readln(s1);
write('Введите 2 строку: ');readln(s2);
for i:=1 to length(s1) do begin
    if not (s1[i] in mn) then begin
        mn:=mn+[s1[i]];
    end;
end;
while k <> length(s2) do begin
    inc(k);
    if s2[k] in mn then begin
        s3:=s3+copy(s2,k,1);
        delete(s2,k,1);
        dec(k);
    end;
end;
writeln('Вторая строка после удаления: ',s2);
writeln('Третья строка: ',s3);
writeln('Для выхода нажмите Enter');
readln;
end.

@ANTIJULJA · 31.05.2012, 17:47 **[ТС]**

спасибо большое очень помог)))))

@ANTIJULJA 0 / 0 / 0 Регистрация: 30.05.2012 Сообщений: 6
		1
	Удалите из второй строки все символы, которые встречаются в первой строке, и поместите их в третью строку 31.05.2012, 12:51. Показов 1326. Ответов 2 Метки нет (Все метки) 1. Удалите из второй строки все символы, которые встречаются в первой строке, и поместите их в третью строку. Добавлено через 5 минут ну народ пожалуйстааа 0

@ANTIJULJA 0 / 0 / 0 Регистрация: 30.05.2012 Сообщений: 6
	31.05.2012, 17:47 [ТС]	3
	спасибо большое очень помог))))) 0

Опции темы

Удалите из второй строки все символы, которые встречаются в первой строке, и поместите их в третью строку

Решение