Дано целое число X. Вычислить значение функции:

2*x, при x>-10 и x<0;
y = sin(x), при x=0;
x*x+1, при x>0 и x<10.


jopa41: язык pascal

Ответы

Ответ дал: George2410
0

Ответ:

begin

 var x := ReadInteger('Введите число:');

 

 if (x > -10) and (x < 0) then

   Print(x * 2)

 else if x = 0 then

   Print(Sin(x))

 else if (x > 0) and (x < 10) then

   Print(x * x + 1);

end.

Вас заинтересует