Y ={(все три) x^2 - 2x +3,x<1
(Под корнем)x-1,1<=x<=2
Cos x ,x>2
Помогите решить программу по работе условный оператор!заранее благодарю

var  x, y: real;begin  Write('Введите х'); Readln(x);  if x < 1 then y := sqr(x) - 2 * x + 3  else  if x <= 2 then y := sqrt(x - 1)  else y := cos(x);  Writeln('y=', y)end.Тестовое решение:Введите х1.5y=0.707106781186548