Ответы и объяснения

  • Sky09
  • профессор
2013-06-17T11:41:50+04:00

uses crt;

var
  x,y:real;
begin
  write('x='); read(x);
  if x<1 then y:=sqr(x)-2*x+3;
  if x>2 then y:=cos(x);
  if (x>=1) and (x<=2) then y:=sqrt(x-1);
  write('y=',y);
end.