FORTRAN分析报告.docx

FORTRAN 不区分大小写，对空格无严格要求；MATLAB区别大小写， 系统内置关键字会自动变绿； 数组列元素优先,默认下标从1开始； 元语言符号和含义： （）：表示括号内对象一定取其中之一； []:表示括号内任取一个对象，也可不取； 1、创建文件： ---创建工作环境（在file中）---创建工程（在左边目录树中右键环境添加工程即可）---创建文件（在file）--- 工程：FORTRAN CONSOLE APPLYCATION 文件:FORTRAN FREE FORMAT SOURCE FILE 直接打开.F90文件时，单击编译就可以调出环境和工程目录； 2、调试： ①---设置断点（手型图标）---单步执行（GO F5）---左下角中locals中查看变量值变化---退出调试（stop debugging （shift+f5）） ②双击错误，即可跳到程序中出错的位置； 3、常见错误： ①1e(-5) --? 1e-5 (不带括号)； 2^（3） -? 2**3 （这是FORTRAN2003新增字符） ②SQRT(i):i必须为实型；SQRT(4.0) A=SQRT(4):出错，类型不匹配； J=DSQRT(4.0) 出错，DSQRT为双精度； J=DSQRT(I) 定义时需REAL*8 I,J 4、常见 1D-7 :1乘以10的-7次方； 乘方：2**2 两个*号； 一、基础知识 ①定义符号常量： 1 REAL PI PARAMETER (PI=3.14) 2 REAL,PARAMETER :: PI=3.14 ②定义字符及字符串 CHARACTER 变量名 CHARACTER (len) 变量名, 或CHARACTER [ ( [LEN=] len) ] 变量名 CHARACTER *len 变量名 ③定义变量： INTEGER :: I=3 有‘：：’可以赋初值，否则不能赋初值； REAL*n 变量名 REAL ( [KIND]=n ) 变量名 （默认为4单精度，8为双精度） ④IMPLICIT REAL*8(A-Z) 说明所有（从A到Z的）变量均为双精度（可以在后续声明中改变部分变量类型） 1有许多变量时可以采用这种声明方法； 二、输入输出 ①输入READ:两种句法格式均可； READ *,x,y,z READ (*,*) x,y ②输出：都仅有一种句法； PRINT: PRINT *,x,y WRITE:WRITE (*,*) ,x,y 1输出文字时，可以用单引号或者双引号； WRITE (*,*) ‘输出’ WRITE (*,*) “输出”(第一个逗号可以不写) 2两个*号时，第一个*表示在系统隐含指定的设备上输出； 第二 个*表示‘表控格式输出（计算机默认格式）’； 一个*号时，*表示‘表控格式输出’； 格式控制三种方法（用指定格式代替代表格式的*）： 1 READ (*,”(I4,I5,I5)”),i,j,k 2PRINT “(1X,’i=’,I5, 1X,’j=’,I5)”,i,j 3WRITE (*,100),i,j 100 FORMAT(1X,’i=’,I5, 1X,’j=’,I5) 1) 5I3 :5和I之间没有*； MI3 :前面为常量时需加尖括号； ③输出数据的个数必须和数据格式编辑符的个数一致： WRITE (*,100),n,I,j,k 100 FORMAT(‘n=’, I2, ’i=’, I3, ’j=’, I4, ’k=’, I3) (4个I编辑符) ④数据格式编辑符： 1整型数据：I编辑符；[r] Iw [.m] i:编辑符重复次数；w：字段总宽度； 2实型数据：F编辑符：[r] Fw.d d:实数小数位数； 3字符型数据：A编辑符：[r] Aw 1）输出数据为*时，说明指定数据宽度位数不够； ⑤控制格式编辑符： nX：空格； Tn：位置编辑符； 指明记录的下一个字符输出到本行的第n个字符的位置上； /： 换行输入； 例：100 FORMAT(T20,NEWTON迭代计算的方程的根：,//, 3X,X=,F15.10,/, 3X,F(X)=,F15.10,/, 3X,ITER=,I3) 三、选择结构程序设计 ①执行代码必须另起一行； IF () THEN IF执行代码 ELSE ELSE执行代码 END IF 1可以没