gamejifan 2007-09-17 07:50:00
点我顶贴
收藏
删除
program p2(input,output)
var
f:array [0..500,0..500] of int64
n,i,j,k,sum:longint
begin
read(n)
for i:=1 to n do
for j:=0 to n do
f[i,j]:=1
for i:=1 to n do
for j:=1 to i div 2 do
for k:=j to i do begin
if i-k<k+1 then break
inc(f[i,j],f[i-k,k+1])
end
writeln(f[n,1]-1)
end.
这个程序我再交就AC了。。为什么测的时候全给我WA了？？跑了100分。