var x,f: real;
begin
writeln('введите x');
readln(x);
if x<0 then f:=2-x;
if x>=0 then f:=0;
writeln(f);
end.
var x,f: real;
begin
writeln('введите x');
readln(x);
if x<0 then f:=2-x;
if x>=0 then f:=0;
writeln(f);
end.