Кумир Рассчитать значение у при заданном значении х: sin2x при х>0, y = 1 - 2sin2x в...

Question

Кумир

Рассчитать значение у при заданном значении х:

sin2x при х>0,

y =

1 - 2sin2x в противном случае.

НАПИШИТЕ ПРОГРАММУ

Answer 1

var
i, n, y: integer;
begin
write ('x= ');
readln (x);
if (x>0) then
y:=sin(2*x)
else
y:=1-(2*(sin(2*x)));
write(y);
end;