vb中:
-10log(19.81/4)=-10*log(4.9575)/log(10)=-6.95
delphi中:
-10log(19.81)=-10*log10(4.9575)=8.2946....e-305书上的结果和vb中的一样。