Решите пожалуйста программу в Pascal:
x=y^2-sqrt(y), при y>=0;
x=3/y+y, при y<0.
Напишите пожалуйста решение программы.