乘法运算以及通过对数转化为加法运算的计算时间比较

通过程序演示和计算，发现没有绝对规律，这跟计算的复杂程度以及运算次数都有关系。

PROGRAM MAIN
n=1E6
a=1.23456789
b=1.00000001
c=a
t0=timef()
DO STEP = 1, n
c=c*b
ENDDO
t1=timef()
a1=log(a)
b1=log(b)
DO STEP = 1, n
a1=a1+b1
ENDDO
d=exp(a1)
t2=timef()
WRITE(*,'('' 乘法运行时间'',2(2X,f18.4))') t1-t0,c
WRITE(*,'('' 加法运行时间'',2(2X,f18.4))') t2-t1,d
STOP
END