напишите программу которая выводит на экран все подмножества множества:{'A','B','C','D'}.

Предполагается, что множество одновременно является собственным подмножеством. Если это не так, надо добавить условие, исключающее вывод при условии i+j+k+l=8

спс большое!

Для спс кнопочка синяя)))

const  a:array[1..2] of string=('','A');  b:array[1..2] of string=('','B');  c:array[1..2] of string=('','C');  d:array[1..2] of string=('','D');var  i,j,k,l:byte;begin  for i:=1 to 2 do    for j:=1 to 2 do      for k:=1 to 2 do        for l:=1 to 2 do          Write(d[i],c[j],b[k],a[l],' ')end.Тестовое решение: A B BA C CA CB CBA D DA DB DBA DC DCA DCB DCBA

Решение без многоуровневой вложенности (python 3.3):def subsets(seq):    if seq == []:        yield []        return    for sub in subsets(seq[1:]):        yield sub    for sub in subsets(seq[1:]):        yield [seq[0]] + subfor x in subsets(['a', 'b', 'c', 'd']):    print(x)