var a,b,c,d:longint;
    e:real;
begin
read(a);
b:=a+8;
c:=b-2;
d:=a+b+c;
e:=d/3;
writeln(a);
writeln(b);
writeln(c);
write(e:0:1);
end.
/**************************************************************
	Problem: 1612
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/