Составить программу разветвляющейся структуры. Значение аргумента ввести с клавиатуры.
x/sin(x-2) X<-2
X2/(tgx+cosx) -2≤X≤1
y= ∛(2-x)/(x-1) 1<X<3
sin(π/2-1) x>3,3
X2/(tgx+cosx) -2≤X≤1
y= ∛(2-x)/(x-1) 1<X<3
sin(π/2-1) x>3,3
Код:
if x<-2 then
y:=x/sin(x-2)
else if x<=1 then
y:=x*x/(sin(x)/cos(x)+cos(x))
else if x<3 then
y:=(2-x)/(x-1)
else
y:=sin(pi/2-1);
y:=x/sin(x-2)
else if x<=1 then
y:=x*x/(sin(x)/cos(x)+cos(x))
else if x<3 then
y:=(2-x)/(x-1)
else
y:=sin(pi/2-1);