program P(input,output);
var m,n:integer;
function FUN(n:integer):integer;
var x:integer
begin
	if n < 1 then FUN:=1
	else begin
		x:=n*FUN(n-1);
		m:=m-1;
		FUN:=m+x;
	end;
end;
begin
	readln (m,n);
	writeln (m,n,FUN(n));
end.