生成树计数矩阵水过

"按照上面规则计算出的小数表达式.如果结果长度大于76,每行输出76个字符. "
这句话实在是太多余了

写了两个程序,一个对了,一个不知为啥错啦,求大神们指点:
var
a:array[1..100] of longint;
i,j,k,y,x,l:longint;
begin
k:=0;
x:=0;
readln(l);
for i:=1 to l do
begin
read(a[i]);
x:=x+a[i];
end;
j:=x div l;
for i:=1 to l do
begin
if a[i]<j then begin
k:=k+1;
a[i]:=j;
a[i+1]:=a[i+1]-j+a[i];
end
else if a[i]>j then begin
k:=k+1;
a[i]:=j;
a[i+1]:=a[i+1]-j+a[i];
end;
end;
writeln(k);
end.

回复 @ミント :
这个跟超电子炮有什么关系吗？

这题目名称可以码了

dfs竟比bfs快！！！
不科学！！！！！

cojs评测机是不是内存小....
最大点申请内存的时候莫名其妙就崩溃

好吧，我是智障

能不能改改数据。。。
不能忍啊。。。

回复 @Ubuntu :
怎么能弃坑呢
我已经重写3次了...
正在调

题解戳http://www.cnblogs.com/joyouth/p/5682137.html

题解戳http://www.cnblogs.com/joyouth/p/5682137.html

题解戳http://www.cnblogs.com/joyouth/p/5682137.html

题解戳http://www.cnblogs.com/joyouth/p/5682137.html

思路比较简单、、实现实在扯淡、、

哈，一个break就值50分= =

说好的都是正整数呢。。怎么还有0。。

目测我这是第一份SPFA->_->

起点还不是025真心无奈QAQ