var a,b,c,d,e:real;
begin
read(a);
b:=a*(80/100);
c:=a*(90/100);
d:=(a+b+c)/3;
write(d:0:1);
end.
/**************************************************************
	Problem: 1613
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/