# Menge von Potenzmengen

## Problembeschreibung

*******************************************
Dokumentnummer: D1295
*******************************************

Die Menge der Potenzmengen für Mengen mit k=0,1,...n Elementen
ist darzustellen

## Problemlösung

beispiele:makelist(makelist(a[i],i,1,j),j,0,5);

mengen:makelist(setify(beispiele[i]),i,1,6);

pascal:makelist(powerset(mengen[i]),i,1,6);

for i:1 thru 6 do print(i-1,pascal[i]);