第二章Fortran语言基础.pptVIP

源程序： program main ！example implicit none real t6,t7,t8,tave t6=22.7 t7=25.8 t8=27.2 tave=(t6+t7+t8)/3.0 print *, tave=,tave end 常用的内部函数如表所示： 函数 意义 ABS(x) 求x的绝对值|x| EXP(x) 求指数函数ex SIN(x) 求正弦函数sin(x)，其中x的单位为弧度 COS(x) 求余弦函数cos(x)，其中x的单位为弧度 ASIN(x) 求反正弦函数arcsin(x) ACOS(x) 求反余弦函数arccos(x) TAN(x) 求正切函数tan(x)，其中x的单位为弧度 ATAN(x) 求反正切函数arctan(x) ATAN2(x,y) 求反正切函数arctan(y/x) LOG(x) 求自然对数ln(x)或logex LOG10(x) 求常用对数log10(x) INT(x) 取x的整数部分，不四舍五入 MOD(x1,x2) 求x1除以x2的余数，即求x1-int(x1/x2)*x2 SIGN(x1,x2) 若x20，则|x1|；若x20，则-|x1| REAL(x) 把整形量x转换为实型 MAX(x1,x2,…) 求x1,x2,…中的最大值 2.7 内部函数 下面举例说明表中内部函数的使用： INT(5.85)=5 INT(-5.85)=-5 MAX(-1,3,16,0)=16 MIN(-1,3,16,0)=-1 LOG(3.0)=1.098612 LOG10(100.0)=2.0 SIN(1.0)=0. TAN(1.0)=1.557408 SQRT(4.0)=2.0 EXP(3.0)=20.08553 MOD(9,6)=3 MOD(6,9)=6 SIGN(3.0,-2.0)=-3.0 SIGN(-3.0,-2.0)=-3.0 SIGN(-3.0,2.0)=3.0 SIGN(3.0, 2.0)=3.0 REAL(-8)=-8.0 SQRT(SQRT(16.0))=2.0它是FORTRAN输入、输出中最简单的一种方式，是按系统隐含的标准格式输入输出。 （2）有格式输入、输出。它是按用户规定的数据格式输入、输出。故也称可控格式（或有格式）的输入、输出。 （3）无格式的输入、输出。它是以二进制形式输入和输出数据，只适用于计算机内存与磁盘、磁带等之间的数据交换。本节只讲（1）表控输入/出，（2-3）将在文件一章讲解。 （1）表控格式输入、输出。 2.8 输入和输出 1.表控输入语句 表控输入不必指定输入数据的格式，所以又称为自由格式输入，其一般形式为：READ *,输入表 其中，“*”号表示表控输入；而输入表（如不同类型的变量，中间用逗号分隔开）则用来控制数据的输入，即要求输入表和输入的数据有严格的对应关系。 例如： a,b为实型，m,n为整型 READ *,a,b,m,n 可以从键盘输入以下数据： 3.7，-1.8，24，10 ↙（数据间用逗号分隔）或： 3.7 -1.8 24 10 ↙（数据间用空格分隔） 则a=3.7，b=-1.8，m=24，n=10。 在使用表控输入语句时应注意以下几点： （1）应保证从输入设备上输入数据的个数与READ语句输入表中变量的个数相同，各数据类型与相应变量的类型一致。 （2）输入数据可分为多行输入，直到输入全部数据。 （3）输入数据个数要求不少于输入表中变量个数。如果少于变量个数，则程序将等待用户输入后续数据。如果多于变量个数，则多余的数据不起作用。 例如：上述READ语句执行时输入以下数据： 3.7，-1.8，24，10，75，34，2.4 ↙ 后3个数是无效的，将被忽略。READ语句读取前4个数后，程序将继续执行下一条语句。 在使用表控输入语句时应注意以下几点： （4）使用多个READ语句时，每个READ语句都是从一个新的输入行开始读数的。 例如： READ *, a,b READ *,m,n 如果输入数据为： 3.7，-1.8，24，10 ↙ 第一个READ语句读入前两个数，即a=3.7，b=-1.8，而第二个READ语句并不会从这一输入行剩余的数据中读数，所以m，n未被赋值。想要正确赋值，应改为两个输入行： 3.7，-1.8 ↙ 24，10 ↙ 在使用表控输入语句时应注意以下几点： （5）输入数据时，可以用符号斜杠“/”结束输入，为被输入数据的变量保持原值不变。 例如： READ *,a,b,m,n 输入数据为： 3.7，-1.8/，24，10 执行结果为a=3.7，b=-1.8，m，n均未被赋值。 在使用表控输入语句时应注意以下几点： （6）如果REA