===== PascalABC.NET =====

begin

 var x := ReadReal('x =');

 var y: real;

 if x > 3 then

   y := x * x + 2

 else if x <= 3 then

   y := x - 8

 else

   y := Sqrt(x + 3);

 Print(y)  

end.