Fortran学习与使用:一道网络数学题的计算方法

 时间:2024-10-14 13:19:49

1、首先打开Fortran编译器,通过File—>New—>Project Workspace建立一个工程,然后Name自行取,Location自行设置。

Fortran学习与使用:一道网络数学题的计算方法

2、然后通过File—>New—>Text File建立空白编辑区。

Fortran学习与使用:一道网络数学题的计算方法

3、然后File—>Save,并把Filename中的Text1.f90改成Text1.f,也可以对Text1进行重命名,然后点击OK。

Fortran学习与使用:一道网络数学题的计算方法

4、此时出现的编辑区带有绿横线。

Fortran学习与使用:一道网络数学题的计算方法

5、在编辑区中输入以下代码: program main integer A,B,C,D,E do A=1,9,1 do B=0,9,1 do C=0,9,1 do D=0,9,1 do E=0,9,1 if((10000*A+1000*B+100*C+10*D+E)*4 .eq. $ (10000*E+1000*D+100*C+10*B+A)) then write(*,100)A,B,C,D,E endif end do end do end do end do end do100 format(1x,'A=',I2,1x,'B=',I2,1x,'C=',I2,1x,'D=',I2,1x,'E=',I2) End

Fortran学习与使用:一道网络数学题的计算方法

6、然后点击编译(Compile,图中红框)和建立(Build,图中篮框),如果0 error(s)和0 warning(s)就可以执行该程序,否则要进行修改和调试。

Fortran学习与使用:一道网络数学题的计算方法

7、如果0 error(s)和0 warning(s),那么按Ctrl+F5执行该程序。出现如下结果,A=2,B=1,C=9,D=7,E=8,即ABCDE=21978,而且确保ABCDE*4=EDCBA。

Fortran学习与使用:一道网络数学题的计算方法
  • 小三角下拉框怎么设置
  • 表格怎么设置选项的内容
  • excel如何添加下拉选项内容
  • office 2019 excel 的单元格如何设置选项填充?
  • 表格怎么增加单元格的下拉列表选项
  • 热门搜索
    文化手抄报 精美手抄报图片 七年级英语手抄报 读书小报手抄报图片 校园手抄报 送别诗手抄报 保护视力手抄报 手抄报主题 小组手抄报 学法懂法守法手抄报