Лариса Князева var y,a,b,c,x:real; begin readln(x,a,b,c); if x>=c then y:=abs(sin(a*x-b)) else if (x>a and x