ПОМОГИТЕ СРОЧНО ПОЖАЛУЙСТА
Помогите сделать программу на языке программирования PascalABC.
не могу понять как делать.

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

begin

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

 var F: real;

 if x > 0 then

   F := Ln(x) + 9

 else

   F := x / (x * x - 7);

 Println('F(x) =', F)

end.