Y ={(все три) x^2 - 2x +3,x<1 (Под корнем)x-1,1<=x<=2 Cos x ,x>2 Помогите решить...

Question

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

Answer 1

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)<br>  else y := cos(x);
  Writeln('y=', y)
end.

Тестовое решение:
Введите х1.5
y=0.707106781186548