Можно ли из символов, общих для двух данных слов, составить третье слово

@Anakein · Регистрация: 03.04.2011

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

Вводятся три слова. Можно ли из символов, общих для двух данных слов, составить третье слово.

@the_crow · 01.06.2011, 09:35

Anakein, извини, некогда.
вот плохой, но рабочий код:

Pascal

var s1,s2,s3:string; f1,f2,f3:boolean; i,j:byte;
begin
write('1st word: ');
readln(s1);
write('2nd word: ');
readln(s2);
write('3th word: ');
readln(s3);
f3:=true;
for i:=1 to length(s3) do
begin f1:=false;
      f2:=false;
      for j:=1 to length(s1) do
      if s1[j]=s3[i] then f1:=true;
      for j:=1 to length(s2) do
      if s2[j]=s3[i] then f2:=true;
      if not(f2 and f1) then
      begin f3:=false;
            break;
      end;
end;
if f3 then writeln('yes')
else writeln('no');
readln;
end.

остальные задачи поищи по сайту.

@Anakein · 01.06.2011, 09:45 **[ТС]**

все равно спасибо))

@Anakein 1 / 1 / 0 Регистрация: 03.04.2011 Сообщений: 32
		1
	Можно ли из символов, общих для двух данных слов, составить третье слово 01.06.2011, 08:27. Показов 1703. Ответов 2 Метки нет (Все метки) Вводятся три слова. Можно ли из символов, общих для двух данных слов, составить третье слово. 0

@Anakein 1 / 1 / 0 Регистрация: 03.04.2011 Сообщений: 32
	01.06.2011, 09:45 [ТС]	3
	все равно спасибо)) 0

Опции темы

Можно ли из символов, общих для двух данных слов, составить третье слово

Решение