鏁版嵁緇撴瀯絎簲绔犵畻娉曡璁￠[10]_璺ㄨ€冪綉

聽聽聽聽聽 1.鑻?/span>S鏄?/span>n涓厓绱犵殑闆嗗悎錛屽垯S鐨勫箓闆?/span>P(S)瀹氫箟涓?/span>S鎵€鏈夊瓙闆嗙殑闆嗗悎銆備緥濡傦紝 S=(a,b,c),P(S)={() ,(a),(b),(c),(a,b),(a,c),(b,c),(a,b,c)}緇欏畾S錛屽啓涓€閫掑綊綆楁硶姹?/span>P(S)銆傘€?a target="_blank">涓滃崡澶у 1993 浜?/span> 錛?/span>15鍒嗭級銆戙€?a target="_blank" class="keylink">涓滃崡澶у 1997 浜?/span> 錛?/span>15鍒嗭級銆?/span>

銆€銆€銆愬弬鑰冪瓟妗堛€?/span>

銆€銆€[棰樼洰鍒嗘瀽] 璁?/span>n涓厓绱犲瓨鏀懼湪鏁扮粍A[1..n]涓€傝S鍒濆涓虹┖闆嗭紝鍙緷嬈″皢鏁扮粍A鐨勬瘡涓€涓厓绱犲茍鍏?/span>S錛屼駭鐢熶簡鍚竴涓厓绱犵殑鑻ュ共闆嗗悎錛屽啀浠ュ惈涓€涓厓绱犵殑闆嗗悎涓哄垵濮嬮泦鍚堬紝渚濇騫跺叆A鐨勭浜屼釜錛堝紓浜?/span>S鐨勯偅涓厓绱狅級鍏冪礌騫跺叆S錛屽艦鎴愪簡鍚袱涓厓绱犵殑鑻ュ共闆嗗悎錛屸€︹€︼紝濡傛涓嬪幓錛岀洿鑷?/span>A[i]鐨勫叏閮ㄥ厓绱犲茍鍏ャ€?/span>

銆€銆€CONST n=10;

銆€銆€TYPE datatype=char;

銆€銆€VAR A: array[1..n] OF datatype;

銆€銆€PROC powerset(s:set OF datatype)

銆€銆€[outset(s); //杈撳嚭闆嗗悎S

銆€銆€FOR i:=1 TO n DO powerset(S+A[i]);

銆€銆€]

銆€銆€ENDP;

銆€銆€璋冪敤鏈繃紼嬫椂錛屽弬鏁?/span>S涓虹┖闆?/span>[]銆?/span>