var f,x:real;
begin
writeln('введите x');
readln(x);
if x<0 then f:=x+sqr(sqr(2)) else if (x>=0) and (x<2*pi) then f:=sin(x) else f:=6*x;
writeln('f(x)=',f)
end.
var f,x:real;
begin
writeln('введите x');
readln(x);
if x<0 then f:=x+sqr(sqr(2)) else if (x>=0) and (x<2*pi) then f:=sin(x) else f:=6*x;
writeln('f(x)=',f)
end.