Преобразование типа char к set of char - PascalABC.NET

Формулировка задачи:

Как решить данную проблему? Так работает:

Writeln((c in m1) or (c in m2));

Const 
  m1 = ['a', 'b', 'c'];
  m2 = ['d', 'e', 'f'];
  m3 = [m1, m2];
 
Var
  c: Char;
  
Begin
  Readln(c);
  Writeln(c in m3);
End.

Решение задачи: «Преобразование типа char к set of char»

textual
                            Листинг программы 
                        

                            type
   TypedSet = class (System.Collections.IEnumerable)
   // ...
                        

Оцени полезность:

12 голосов , оценка 3.833 из 5

Похожие ответы