Pagini recente » Cod sursa (job #2733173) | Cod sursa (job #2900260) | Cod sursa (job #1018962) | Cod sursa (job #2693356) | Cod sursa (job #35793)
Cod sursa(job #35793)
var f:text;
n,m,i,j:integer;
h,h2:byte;
x,k:longint;
a:array[1..2,-50000..50000] of longint;
begin
assign(f,'diamant.in');
reset(f);
read(f,n,m,x);
close(f);
a[1,0]:=1;
h:=1;
h2:=2;
for i:=1 to n do
for j:=1 to m do
begin
for k:=-44100 to 44100 do
a[h2,k]:=a[h,k-i*j]+a[h,k+i*j]+a[h,k];
h2:=h;
h:=h mod 2+1;
end;
assign(f,'diamant.out');
rewrite(f);
writeln(f,a[h,x]);
close(f);
end.