program square;

var a,P:integer;
begin
	read(a);
	p := 4*a;
	write('Периметр квадрата: ', P);
end.