Pagini recente » Cod sursa (job #1438880) | Cod sursa (job #245938) | Cod sursa (job #1522667) | Cod sursa (job #2929564) | Cod sursa (job #43766)
Cod sursa(job #43766)
const
lim=45000;
var
r,c,l,k,i,j,n,m,x:longint;
a:array[0..1,-lim..lim] of longint;
sol:longint;
begin
assign(input,'diamant.in');
reset(input);
readln(n,m,x);
close(input);
l:=0;
for i:=1 to n do
for j:=1 to m do l:=l+i*j;
r:=0; c:=1;
a[r,0]:=1;
for i:=1 to n do
for j:=1 to m do
begin
for k:=-l to l do
begin
if a[r,k]>0 then
begin
inc(a[c,k+i*j],a[r,k]);
inc(a[c,k-i*j],a[r,k]);
end;
a[c,k]:=a[c,k]+a[r,k];
a[r,k]:=0;
end;
r:=1-r;
c:=1-c;
end;
dec(a[r,0]);
assign(output,'diamant.out');
rewrite(output);
writeln(a[r,x]);
close(output);
end.