Question

Pascal
Написать программу, вычисляющую по заданному значению аргумента X значение функции Y по
соответствующей значению Х формуле :
1) Y = X+sin X, если -3 < Х < -1 ИЛИ 0 < X < 2;
2) Y = -X, если 4 < Х < 8 ИЛИ X > 15;
3) Y = X, при любом другом Х

Answer 1

Ответ:

• var X,Y:real;
• begin
• read(X);
• if ((-3<X) and (X<-1)) or ((0<X) and (X<2)) then Y := X + sin(X)  
• else if ((4<X) and (X<8)) or (X>15) then Y := -X
• else Y:=X;
• Println('Y:',Y);
• end.

Пример работы: