1.if max
2.sum:=(1+n)*n/2;
3.for i:=1 to n do sum:=sum+a[i];
4.for i:=1 to n do sum:=sum+a[i];
s:=sum/i;
5.for i:=1 to m do
if (a[1] mod i=0) and ......and (a[n] mod i=0) then q:=i;
w:=a[1]/q*a[2]/q*......*a[n];
6.n!
7.i:=a[n];
内容全部来源于网络收集，如有侵权，请联系网站删除！
QQ：24596024