Паскаль: Вычислить значение у при заданном значении x:

Question

Паскаль: Вычислить значение у при заданном значении x:

---

Answer 1

If ( x >= 0 ) and ( x <= 1 )<br>  write( x*x- x )
else
  if ( x < 0 ) or ( x > 0 ) 
    write ( x*x - sin (3,14*x*x) );
P. S. На сколько я знаю, в Паскале есть функция sin ()