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