Даны два слова. Напечатать только те буквы слов, которые есть только в одном из них (в том числе повторяющиеся)

@Chelmedsvin · Регистрация: 10.01.2013

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

Даны два слова. Напечатать только те буквы слов, которые есть только в одном из них (в том числе повторяющиеся). Например, если заданные слова «процессор» и «информация», то ответом должно быть: «п е с с и ф м а и я»

@CodeR · 12.01.2013, 11:55

Pascal

Var s1,s2:string;
    i:byte;
Begin
    write('Первое слово: ');readln(s1);
    write('Второе слово: ');readln(s2);
    For i:=1 to Length(s1) do
     if Pos(s1[i],s2)=0 then write(s1[i],' ');
    For i:=1 to Length(s2) do
     if Pos(s2[i],s1)=0 then write(s2[i],' ');
    readln;
End.

@Chelmedsvin 0 / 0 / 0 Регистрация: 10.01.2013 Сообщений: 4
		1
	Даны два слова. Напечатать только те буквы слов, которые есть только в одном из них (в том числе повторяющиеся) 12.01.2013, 10:45. Показов 1819. Ответов 1 Метки нет (Все метки) Даны два слова. Напечатать только те буквы слов, которые есть только в одном из них (в том числе повторяющиеся). Например, если заданные слова «процессор» и «информация», то ответом должно быть: «п е с с и ф м а и я» 0

	12.01.2013, 11:55

Даны два слова. Напечатать только те буквы слов, которые есть только в одном из них (в том числе повторяющиеся)

Решение