pascal体会.ppt

问题描述：找出小于33的6个正整数，用这些整数进行加法运算，使得包括原来的整数在内能组成尽可能多的不同整数。 例如：用2，3，5这三个数能组成下面的数 2, 3, 5 2 + 3 = 5, 但5已经存在 2 + 5 = 7, 3 + 5 = 8, 2 + 3 + 5 = 10 所以用2，3，5能组成6个不同的数。 程序要求：输出所选的这6个数，以及能组成不同整数的个数。 算法提要：选择的这6个数，用来组成数时应该尽可能不重复，引入数组a保存找出的这6个整数。 6、1995年普及组初赛试题 begin a[1]:=1; t:=0; for i:=2 to 6 do begin __; for j:=1 to i-1 do s:=_ _; a[i]:= _; end; for i:=1 to 6 do begin t:= __ __ ; write(a[i], ); end; writeln(‘能组成不同整数的个数：, t) end. 程序清单: s:=0 s+a[j] s+1