Множество[4]

@Help Me! · Регистрация: 25.09.2013

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

Множество А содержит гласные буквы английского алфавита, множество В - согласные буквы английского алфавита. Множество С - буквы фамилии(можно любую, ivanov, например). Определить пересечения С и А, С и В.

Прошу помощи

@ildwine · 13.11.2013, 17:07

Pascal

var
  s : string;
  a, b, c : set of char;
  i : byte;
begin
  write('введите фамилию: ');
  readln(s);
  for i := 1 to length(s) do include(c, s[i]); {множество букв фамилии}
  a := ['a', 'e', 'i', 'o', 'u', 'y']; {множество гласных} 
  b := ['a'..'z'] - a; {множество согласных}  
  writeln('множество A: ', a);
  writeln('множество B: ', b);
  writeln('множество C: ', c);  
  writeln('пересечение C и A: ', c * a);
  writeln('пересечение C и B: ', c * b)
end.

@Help Me! 0 / 0 / 0 Регистрация: 25.09.2013 Сообщений: 15
		1
	Множество[4] 13.11.2013, 16:33. Показов 1345. Ответов 1 Метки нет (Все метки) Множество А содержит гласные буквы английского алфавита, множество В - согласные буквы английского алфавита. Множество С - буквы фамилии(можно любую, ivanov, например). Определить пересечения С и А, С и В. Прошу помощи 0

	13.11.2013, 17:07

Опции темы

Множество[4]

Решение