Помогите пожалуйста)решить в паскале:(1-tg x)^ctg x+cos(x-y)

По умолчанию Паскаль считает тригонометрические функции для радиан, но можно перевести в градусы, если нужно (пишите в комментариях)


var x,y:real;
begin
writeln (Введите x,y в радианах);
read (x,y);
writeln (power((1-tan(x)),(1/tan(x))) + cos(x-y));
end.