fpcdocs/mathex/ex9.pp


1
2
3
4
5
6
7
8
9
10
11

Program Example9;

{ Program to demonstrate the cotan function. }

Uses math;

begin
  writeln(cotan(pi/2));
  Writeln(cotan(pi/3));
  Writeln(cotan(pi/4));
end.