Program z1;
uses CRT;
var y,x:real;
begin
clrscr;
Writeln('x=');
Readln(x);
y:=2*x+1;
Writeln('y=',y);
Readkey;
end.