Составить программу для вычисления значения функции y= 0.5^x+3,x<-8 Sin(x-3),-8<=x<=0...

Question

Составить программу для вычисления значения функции

y= 0.5^x+3,x<-8<br> Sin(x-3),-8<=x<=0<br> 3x-3,x>0

Answer 1

Var x,y:real;
begin
write('x = '); readln(x);
if x<-8 <br> then y:=exp(x*ln(0.5))+3
 else if x<=0 then y:=sin(x-3) else y:=3*x-3;<br>writeln('y = ',y);
end.

Пример:
x = 4
y = 9