可以这样定义变量X：real（8）X 或者 real*8 X 或者 real（kind=8） ！f90新增read(1,*) X ！输入数值因为默认的real是单精度型，所以需要显式定义双精度型。双精准度有效位数为15位 ，占用8个字节（64位），范围是-1.79E308~1.79E308还可以在输入的时候把指数符号E改成D，这样精度也会提高。
