例23 PROGRAM Main Interest=0.08 Count=0. 08 PRINT 'Interest= Interest l0 PRINT* 'Count= Cont 0.0 END PROGRAM Main IMPLICIT NONE REAL Interest. Count Interest=0.08 Count=0. 08 PRINT 'Interest= Interest 0.08 PRINT* 'Count= Count 0.08 END 通过类型声明,消除隐含约定带来的错误。例 2-3  PROGRAM Main  Interest=0.08  Count=0.08  PRINT*, ‘Interest = ‘,Interest !0  PRINT*, ‘Count = ‘, Cont !0.0  END PROGRAM Main IMPLICIT NONE REAL Interest, Count Interest=0.08 Count=0.08 PRINT*, ‘Interest = ‘,Interest !0.08 PRINT*, ‘Count = ‘, Count !0.08 END 通过类型声明，消除隐含约定带来的错误