Net2/usr/src/usr.bin/pascal/tstpx/out/t18.out

 1.00000000000000e+00         1

4 statements executed in 0.02 seconds cpu time.