Написать программу для решения трансцендентного уравнение - C#

Формулировка задачи:

Здравствуйте! Необходимо разработать программу для решения уравнения tg(x)=|m|/x, где m изменяется в интервале [-79.5;79.5]. Точность решения 0.001 Пожалуйста помогите хотя бы с алгоритмом :с

Решение задачи: «Написать программу для решения трансцендентного уравнение»

textual
                            Листинг программы 
                        

                            program Newton;
 
function tg(x:real):real; 
begin
 tg := sin(x)/cos(x); 
end;
 
function f(x:real):real; 
begin
 f := tg(x)-(1/x); 
end;
 
function f1(x:real):real; {Первая производная функции}
begin
 f1:= 1/(sqr(cos(x)))+(1/sqr(x));
end;
 
var a,b,x,eps,en:real;
    i:integer;
 
begin
 writeln ('Решение нелинейного уравнения методом Ньютона');
 writeln ('tg(x)-((abs(m))/x)');
 write ('Введите требуемую точность решения:');
 read (eps);
 writeln ('Решение:');
 writeln ('Номер шага      Значение X');
 a:= -2;
 b:= 1;
 en:= abs(a-b);
 x:= b;
 i:= 1;
 while (abs(en)>eps) do begin 
  x:=x-f(x)/f1(x); {Шаг метода}
  writeln (i:10,x:14:3); {Вывод значения X с шагом i}
  en:=abs(x-b); {Новая точность}
  b:=x; {Значение границы для следующего шага}
  i:=i+1; {Номер шага}
 end;
end.
                        