pascal 竞赛试题求解！

有平方差公式s1*s1-s2*s2=(s1+s2)*(s1-s2)。

显然s1+s2的值是固定的，所以只需使(s1-s2)的值最小。

通过计算可以得出由a中的几个数字可以组成的和(f[i]值为true表示存在方案组成i)

为使s1-s2值最小，只需使s2最接近平均数即可

program wapiknow

var n,i,j,s1,s2,sum:longint

    a:array[1..100] of longint

    f:array[0..11000] of boolean

begin

  readln(n)

  for i:=1 to n do 培首悉read(a[i])

  fillchar(f,sizeof(f),false)

  f[0]:=true

  for i:=1 to n do

    芹乱for j:=10000 downto 0 do

      if (f[j]=true) then f[j+a[i]]:=true

  sum:=0

  for i:=1 to n do sum:=sum+a[i]

  for i:=sum div 2 downto 0 do

    if (f[i]=true) then

    begin

      s2:=i

      break

    end

 配乎 s1:=sum-s2

  writeln(s1*s1-s2*s2)

end.

希望我的回答能帮到你。

全国计算机考试练习试题

首先我们先看下软件展示图，后面是软件！

图：

1、全国计算机等级考试超级模拟软件。

汇聚了多年开发全国计算机等级考试模拟软件的丰富经验，并综合有经验的命题专家、教授和全国各地考点一线教师的建议基础上研制而如哗成。本套软件采用模拟考试形式，以大量的习题练习，强化考生的应考能力。

2、捷成全国计算机等级考试练习系统。

上机考试枝橡神系统提供了历届考试题100套，并附有试题分析和参考答案，可以帮助考生熟悉考试模式，提高应试能力，测试实际 *** 作和应变能力，自己评定成绩，猛亏对正式考试时能否通过进行初步的估计。

3、未来教育2017二级msoffice模拟软件

以其模式的高专业度，题库权威度而闻名业界，它聚合历年真题加以分析从而提出权威预测，效果非常不错。

---