# Potenzmenge und k-elementige
Teilmengen

## Problembeschreibung

******************************************
Dokumentnummer: D1311
******************************************

Man bestimme die Potenzmenge einer Menge von n-Elementen
und gliedere diese Potenzmenge in Teilmengen von k=0,1,...,n
Elementen.

## Problemlösung

EINGABE

M:read("Gib eine Menge ein");

VERARBEITUNG

P:powerset(M);

n:length(M);

for i:0 thru n do print(subset(P,lambda([e],is(cardinality(e)=i))));