program kormidlo;

var N, V, S, Total, i: longint;
begin
	writeLn( 'Jak velké je kormidlo?' );
	readLn( N );
	V := 0;
	S := 1;
	Total := N*N;
	for i := 1 to N - 1 do begin
		inc( V, S );
		inc( S, V );
		inc( Total, ( N - i ) * ( N - i ) * V );
	end;
	writeLn( 'Kormidlo je možné sestavit ', Total, ' způsoby' );
end.