summaryrefslogtreecommitdiff
path: root/fpcdocs/mathex/ex21.pp
blob: 66565ba1bdd1159d2f88162463fc335de0f33943 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Program Example21;

{ Program to demonstrate the log10 function. }

Uses math;

begin
  Writeln(Log10(10):8:4);
  Writeln(Log10(100):8:4);
  Writeln(Log10(1000):8:4);
  Writeln(Log10(1):8:4);
  Writeln(Log10(0.1):8:4);
  Writeln(Log10(0.01):8:4);
  Writeln(Log10(0.001):8:4);
end.