+10
4 года назад
Информатика
10 - 11 классы
var x,y,s:real;
begin
writeln('введите х в радианах');
readln(x);
writeln('введите y в радианах');
readln(y);
s:=(sin(x)+cos(y))/(cos(x)-sin(y))*tan(x*y);
writeln(s)
end.
var x,y,s:real;
begin
writeln('введите х в радианах');
readln(x);
writeln('введите y в радианах');
readln(y);
s:=(sin(x)+cos(y))/(cos(x)-sin(y))*tan(x*y);
writeln(s)
end.