Напечатать только те буквы слов, которые есть только в одном из них

@yaho · Регистрация: 06.09.2012

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

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

Комментарий модератора

Правило форума 5.16. Запрещено создавать темы с множеством вопросов во всех разделах, кроме разделов платных услуг. Один вопрос - одна тема.

@КонецСвета · 03.12.2012, 13:51

Pascal

uses crt;
var s1,s2: string;
    i: byte;
begin
write('s1='); readln(s1);
write('s2='); 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],' ');
end.

	03.12.2012, 13:51

Напечатать только те буквы слов, которые есть только в одном из них

Решение