подожди 5 сек щас решу.Добавлено (17.01.2010, 19:34)
---------------------------------------------
скажи, как найти тангенс и котангенс из синуса и косинуса
Добавлено (17.01.2010, 20:00)
---------------------------------------------
с тригонометрией я плохо дружу, но если sin/cos=tg, а 1/tg=ctg, то вот решение
Code
var a, b, x, y : real;
begin
read(a, b, x);
if a>=b then begin
if (x>=5)and(x<=10)then y:=a-sin(x);
if (x>10)and(x<=15)then y:=b/cos(x);
if (x>15)and(x<=20)then y:=a/3*(sin(x)/cos(x));
if (x>20)and(x<=25)then y:=sqrt(cos(x)/sin(x));
end;
write(y);
end.