Dini的个人博客分享 http://blog.sciencenet.cn/u/Dini

博文

一个FORTRAN的问题1/1!+1/2!+...+1/10!

已有 1953 次阅读 2019-5-4 17:50 |个人分类:|系统分类:科研笔记

5月1,2,3,4,4天看了Fortran六章,发现自己好像忘了matlab了。遇到了这个题,用matlab验证了一下。matlab也没精通的情况下,学Fortran真的可以吗?但是不可以,也要学呀。后面还要学python和...因为需要。

加油!!!

91-1611211K419-52.jpg

问题:1/1!+1/2!+...+1/10!

fortran

program ex72
    implicit none
    integer::limit=10
    integer counter
    integer::j=1
    real::s=0.0 !要注意s的类型,要是浮点型。我第一次设置成integer就出错了
    do counter=1,limit
     j=j*counter
        s=s+1.0/j !要注意,因为求出的s是浮点型,所以这里要用1.0,我第一次用1的时候,结果就是1.
       
       
    end do
    write(*,*)j,s
    read(*,*)
    end
   

 运行结果

         3628800   1.718282


在出错的时候,我用matlab验证了一下。

s=0;
j=1;
for i=1:10
    j=j*i;
    s=s+1/j;
end
s

运行结果

s =

     1.718281801146385e+00





http://blog.sciencenet.cn/blog-3411101-1177071.html

上一篇:Fortran--常数的声明方法
下一篇:果然和预想的是一样的

0

该博文允许注册用户评论 请点击登录 评论 (3 个评论)

数据加载中...

Archiver|手机版|科学网 ( 京ICP备07017567号-12 )

GMT+8, 2021-1-28 17:57

Powered by ScienceNet.cn

Copyright © 2007- 中国科学报社

返回顶部