FORTRAN90第一章FORTRAN90概述.ppt

1、1 FORTRAN 90概述；FORTRAN是第一个高级语言，是数值计算领域中广泛使用的编程语言。1954年正式使用1956年正式使用1958年出现了fortran ii，1962年出现了fortran iv。1966年，美国标准化协会(ANSI)宣布，标准FORTRAN(x 3.9-1966)牙齿FORTRAN iv基本FORTRAN(x 3.10-1966)和FORTRAN ii相当于1972年国际标准化组织(ISO)国际标准3360 FORTRAN ISO 1539FORTRAN 77具有两个茄子级别的3360 Fortran全集和FORTRAN子集级别。1980年，ISO宣布了国际标准

2、Fortraniso 1539。1980 1991年ISO出现了基于Windows编程的FORTRAN 90标准：ISO/IEC 15391991 FORTRAN 95，正在准备新的标准。1.2 FORTRAN 90语言的特性，FORTRAN77的扩展主要通过将数组运算引入：来增强数值计算功能，还引入了内部数据类型参数自定义数据类型、计算和分配引入模块数据和流程定义功能引入指针概念。FORTRAN90的先进性：实际实现了程序的结构设计，提高了结构块、模块和进程调用的灵活性，吸收了C和PASCAL语言的优点，具有现代语言特色，扩展了FORTRAN77在数字计算方面的操作能力，是多字节字符集支持F

3、ORTRAN 77的向下兼容。1.3简单fortran 90程序分析，简单fortran 90源节目基础结构：节目名称说明语句部分执行语句部分内部过程END PROGRAM节目名称的内容可能出现，也可能不出现，但不能出现部分。每行语句不能超过132个字符。书写格式自由。不区分大写字母和小写字母。如果每行有多个语句，请用分号分隔。门排中！注释，后面的内容只起注释的作用。但是在引号内！不在牙齿列中。空的运动程序很容易阅读，空的行也可以看作是注释门。在一行的末尾添加B=10。C=23 ave=(a b c)/3 write (*，*) ave=，ave end progra，专用名称对特定类型、收购

4、类型有严格的要求。例如，DABS(X)查找双精度实数X的绝对值，而CABS(Y)查找复数Y的模。最好不要使用专用名称。常用数学函数：abs()、atan()、acos()、asin()、tan()、cos()、int()、sqrt()、sqrt参数的值必须赋予函数含义。一些字符处理函数也相对重要。函数的使用可以看到相关资料。1.7数据类型与计算结果匹配的算术表达式。表达式：算术表达式3360 x/sqrt(x * * 2y * * 2z * * 2)* exp(sin(y)文字表达式3360 name/tel 3360/，在算术表达式中，乘法用作*，不能省略。杰浩用/；方括号必须成对使用()，

5、不要使用方括号和方括号。乘法以* *表示。在算术表达式中，数据类型与转换规则：相同类型的土方计算结果也是牙齿类型。特别是在除以两个整数的情况下，商也是整数，所以小数部分会丢失。示例：-5/2=-2，5/2=2徐璐如果有其他类型的数量运算，则将较低级别类型转换为较高级别类型，然后进行计算，则结果类型与较高级别类型匹配。例如，1/4 * 5.0=(1/4)* 5.0=0 * 5.0=0.0 * 5.0=0.0，各种算术运算的优先级级别为：括号函数乘法和除法。相同水平的运算从左到右进行，但连续的乘法首先向右和向左进行。，1.8示例解释表达式，示例：是fortran表达式，使用数学代数，(3 * a

6、* a4 * b * * 3)/(a-b)，(-b sqrt (b * b-4)，每个fortran程序只有一个主程序。主程序的启动语句可以包括：节目名称、节目单元、主节目、外部子节目、模块子程序和内部子程序。包含内部子程序的程序可以由该内部子程序的宿主、宿主和宿主中的其他内部子程序调用内部子程序。语句可以分为两种茄子类型的：可执行语句和不可执行语句。门的创建顺序有限制。1.10语句、1.11赋值语句、=不是等号，而是赋值编号。A=A 2，首先计算表达式的值。结果类型等于参与最后一次运算的数量中的较高级别。重新分配给变量，并根据变量类型执行类型转换(如果需要)。例如，1/4 * 5 2.8=0

7、 * 5 2.8=0 2.8=0.0 2.8=2.8 r=1/4 * 5 2.8得到r=2.8，r是实数，不要转换I=1/4，1.12简单的输出/输入，将内存中的数据传输到外部设备进程的过程称为输出。程序必须有输出。通过外部设备将数据传输到内存的过程称为输入。程序是否需要输入数据取决于需要解决的问题。输入/输出过程具有三个茄子元素：用于输入/输出的设备输入/输出的数据格式输入/输出。输出数据和输入数据都必须以一定的格式进行。fortran有3茄子输入/输出格式：标准格式(表控制格式)最简单的格式用户格式非格式(二进制)牙齿，数据输入通过READ语句完成。READ语句：READ(输入设备，输入格

8、式)输入列表将自由形式表控制输入作为输入格式*，将： READ(输入设备，*)输入列表作为输入设备*键盘输入： READ (*，*，)操作机器时，必须记住输入数据后按回车。输入数据类型必须正确。数据分为空格或逗号或回车符。输入数据包含/符号时，/后面的输入数据不起作用。/如果以前输入的数据不足，要输入的其馀数据将保持不变。否则，数字(算术)类型和文字类型数据采用零值。逻辑数据真实值；输入额外的数据没有效果。输入的数据，算术数据必须是与变量类型相同的常量。文字数据，长度不足时空格，长度超过时截断不需要的部分。逻辑是t或f或.t或.可以输入以f开头的任何字符串。print语句：print输出格式，

9、输出列表以表格控制格式*输出格式显示，输出格式由编译系统确定。文字数据始终按文字表达式的原样输出。整数为11列、实数为15列(小数6列、小数点1列、整数7列、符号1列、标准化金志洙格式的3360金志洙4列、小数6列、小数点1列、整数1列、符号1列)、右对齐。示例：PRINT *、I、A B、C*SQRT(A*B)，输入数据中的两个连续逗号表示法表示不更改该变量的值。数据输出由WRITE语句和PRINT语句执行。整数常数n*常数c您可以输入n个值为常数c的资料，并将值指定给输入清单中的n个连续变数。在复合数据输出中，实际部分和虚拟部分不处理为实际数据，输出结果在复合常数格式：牙齿括号对中，实际部

10、分和虚拟部分分为逗号。PRINT语句输出过多的内容会自动换行。逻辑数据输出以T(.TRUE .)或F(.FALSE .)形式记录。每次执行PRINT语句时，除非以特殊格式说明，否则将输出另一行，因此PRINT *语句将输出空行。write语句： write(输出设备，输出格式)输出列表使用*输出设备在屏幕上显示输出，write(*，输出格式)输出列表的行为与print输出格式相同。还以*输出格式表示表驱动格式。write(*，*)输出列表与print *相同，输出列表相同。示例： WRITE (*，*) a、b * sin (x)、print语句仅输出到屏幕，WRITE语句可以指定输出设备。WRITE可以完全替换PRINT语句。PRINT语句似乎不需要。1:PARAMETER格式1.13参数语句(PARAMETER语句)(P1=C1，p2=C2 pa parameter (pi=3.14159，e=2.71828)符号常量，符号常量还有一种类型，该类型预说明： I