二顺序结构Fortran程序设计.pptx

2024/8/30 周五周五1一、一、一、一、FortranFortranFortranFortran常量常量常量常量（1 1）什么是常量）什么是常量在在程程序序运运行行的的过过程程中中，其其值值不不改改变变的的量量。比比如如，12.012.0、-2-2、FORTRANFORTRAN等等都都是是常常量量。在在FortranFortran中中，常常量量分分为为直直接接常常量量和和符号常量符号常量两大类：两大类：（2 2）直接常量）直接常量指指指指数数数数据据据据本本本本身身身身就就就就是是是是一一一一个个个个常常常常量量量量，FortranFortran处处理理整整型型（IntegerInteger）、实实型型（RealReal）、双双 精精 度度 型型（Double Double PrecisionPrecision）、复复 型型（ComplexComplex）、逻逻辑辑型型（LogicalLogical）、字字符符型型（CharacterCharacter）等等六种直接常量六种直接常量六种直接常量六种直接常量，每种数据常量有各自的表示方法。，每种数据常量有各自的表示方法。1 Fortran1 Fortran程序中最基本的数据程序中最基本的数据2024/8/30 周五周五21 1、整整型型常常量量：就就是是整整型型常常数数（整整数数），包包括括正正数数、负负数数和和零零。但但要要注注意意的的是是-数数字字间间不不能能加加平平常常表表示示千千分分位位的的“,”号号以以及及加加空空格格，也也不不能能带带小小数数点点。比比如如，3,567,2123,567,212、8 8 9999、6.16.1都都是是错误的整型常量。错误的整型常量。2 2、实型常量实型常量：就是实型常数（：就是实型常数（实数实数），有两种表示形式），有两种表示形式-小小数数点点形形式式：根根据据小小数数点点前前后后是是否否有有数数字字，有有3 3种种形形式式 m.nm.n、m.m.、.n.n，数数字字前前面面可可以以加加上上符符号号，比比如如，-6.8-6.8、9.9.（=9.0=9.0）、.89.89（=0.89=0.89）等。）等。指指数数形形式式：一一般般用用来来表表示示绝绝对对值值很很大大或或很很小小的的数数，表表示示方方式式是是用用E E表表示示以以1010为为底底指指数数，且且E E的的左左边边为为数数字字部部分分、右右边边是是指指数数部部分分，比比如如，1.32E61.32E6（=1.3210=1.32106 6）、2.68E-82.68E-8（=2.6810=2.6810-8-8）。用指数形式表示实数时要）。用指数形式表示实数时要注意注意：、数数字字部部分分可可以以是是整整型型的的也也可可以以是是实实型型的的，如如1E2 1E2=1.0E2 1.0E2=100.0100=100.01002024/8/30 周五周五3、E E的的左左右右两两边边的的数数字字部部分分和和指指数数部部分分必必须须同同时时出出现现、缺缺一一不不可可，比比如如，E-9E-9（缺缺数数字字部部分分）和和.E2E2（单单独独的的小小数数点点）都都是是不合法的。不合法的。、指指数数部部分分只只能能是是整整数数、不不可可写写成成实实数数，如如8E2.38E2.3是是错错误误的的指数表示；指数表示；（3 3）符号常量）符号常量所所谓谓的的符符号号常常量量，是是用用一一个个标标识识符符来来代代表表一一个个常常量量。使使用用时时，需需要要对对符符号号常常量量进进行行说说明明，方方法法是是用用ParameterParameter语语句句来来说说明明（定义）（定义），比如：，比如：Parameter Parameter(Pi=3.14159Pi=3.14159,M=80M=80)这这个个语语句句定定义义了了两两个个符符号号常常量量PiPi和和M M，在在程程序序单单元元中中PiPi就就代代表表了了3.141593.14159、M M代代表表了了8080。其其中中ParameterParameter就就是是定定义义符符号号常常量量使使用用的的特特定定标标识识符符，被被被被定定定定义义义义的的的的量量量量要要要要放放放放在在在在括括括括号号号号内内内内、而而而而且且且且有有有有多多多多个个个个符符符符号号号号常量时之间要用常量时之间要用常量时之间要用常量时之间要用“,”分隔分隔分隔分隔。2024/8/30 周五周五4二、二、二、二、FortranFortranFortranFortran变量变量变量变量（1 1）什么是变量）什么是变量变变量量与与常常量量相相对对应应，是是指指在在程程序序运运行行的的过过程程中中，其其值值可可以以改改变变的的量量。变变量量实实实实质质质质是是是是代代代代表表表表一一一一个个个个数数数数据据据据存存存存储储储储单单单单元元元元，因因此此，在在FortranFortran中经常用到下面（中经常用到下面（貌似错误貌似错误貌似错误貌似错误）的语句：）的语句：N=N+1 N=N+1其表示其表示存储单元存储单元N N中的数据中的数据在原来的基础上增加在原来的基础上增加1 1。此此外外，要要注注意意parameterparameter语语句句是是非非执执行行语语句句，在在程程序序编编译译时时符符号号常常量量名名均均被被替替换换相相应应的的常常量量，而而后后面面要要讲讲的的变变量量则则是是一一个个数数据据存存储储单单元元（其其其其中中中中的的的的值值值值是是是是变变变变化化化化的的的的），因因此此符符符符号号号号常常常常量量量量不不不不能能能能当当当当变变变变量量量量使用使用使用使用！（2 2）变量的取名）变量的取名变变量量需需要要一一个个名名字字来来识识别别-变变变变量量量量名名名名，其其用用标标识识符符来来命命名名，在在FortranFortran语语言言中中变变量量名名的的标标识识符符只只能能由由字字母母、数数字字和和下下划划线线组组成、成、且开头只能是字母且开头只能是字母且开头只能是字母且开头只能是字母，比如，比如x x、total2total2、k123k123等。等。2024/8/30 周五周五55 5、变量名不区分字母、变量名不区分字母大小写大小写，比如：，比如：grade grade、GradeGrade、GRADE GRADE 代表同一变量名；代表同一变量名；6 6、标标识识符符的的长长度度因因FortranFortran版版本本不不同同而而有有差差异异，Fortran90Fortran90中中标标识符长度范围识符长度范围1 13131，超过的字符无效；（，超过的字符无效；（F77F77是是1 16 6个）个）7 7、FortranFortran没没有有规规定定“保保留留字字”，即即可可以以使使用用FortranFortran的的语语句句名名、函函数数名名等等作作为为变变量量名名，但但为为了了避避免免误误解解、混混淆淆，实实际际中中最最好好不不用它们作变量名，比如：用它们作变量名，比如：不不要要用用printprint、readread、openopen、writewrite、sinsin、FortranFortran等等作变量名；作变量名；2 2、在同一程序单元中不能用相同的变量名代表不同的变量；、在同一程序单元中不能用相同的变量名代表不同的变量；1 1、变量名必须以字母开头，比如；、变量名必须以字母开头，比如；Sy12 Sy12、mxmx等是合法的，而等是合法的，而3bh3bh、_xu8_xu8等是不合法的变量名。等是不合法的变量名。3 3、变量名中的空格不起作用，比如：、变量名中的空格不起作用，比如：abcabc，a bca bc，ab cab c，a b c a b c 代表同一变量代表同一变量4 4、变量名尽量做到、变量名尽量做到“见名知义见名知义”AVERAVER、SUMSUM、mymaxmymax ；2024/8/30 周五周五6（3 3）变量的类型）变量的类型变变量量是是数数据据存存储储单单元元，其其表表示示的的数数据据类类型型要要进进行行说说明明，有有3 3种方法说明：种方法说明：1 1、强制说明、强制说明或或显式说明显式说明直接指出直接指出变量的变量的数据类型数据类型，用，用类型说明语句类型说明语句（格式格式）说明：说明：数据类型数据类型说明符说明符 变量名变量名1 1，变量名变量名2 2，根据数据的类型，其中的根据数据的类型，其中的说明符包括说明符包括：IntegerInteger说明变量为整型变量说明变量为整型变量RealReal说明变量为实型变量说明变量为实型变量Double precisionDouble precision说明变量为双精度变量说明变量为双精度变量ComplexComplex说明变量为复型变量说明变量为复型变量LogicalLogical说明变量为逻辑型变量说明变量为逻辑型变量CharacterCharacter说明变量为字符型变量说明变量为字符型变量2024/8/30 周五周五7比如：比如：Integer x,y -Integer x,y -定义定义2 2个整型变量个整型变量x x和和y yReal area,average,student1 -Real area,average,student1 -则定义则定义3 3个实型变量个实型变量说说明明多多个个变变量量时时，变变量量间间用用“,”分分开开，但但末末尾尾不不能能用用“.”，比如，比如，double precision a,b,cdouble precision a,b,c.是错误的。是错误的。这这种种说说明明语语句句的的特特点点是是，不不仅仅进进行行了了变变量量数数据据类类型型的的说说明明，而而且且还还可可以以给给被被说说明明的的变变量量赋赋予予初初值值或或变变量量初初始始化化（具具有有双双重重功功能能）。比比如如：Real:Real:total=73.2 total=73.2 -定定义义了了实实型型变变量量totaltotal，同时给它赋初值为，同时给它赋初值为73.273.2。此此外外，在在Fortran90Fortran90中中，还还可可以以用用下下面面的的语语句句来来说说明明变变量量类型：类型：类型说明符类型说明符:变量变量1 1，变量，变量2 2，比如：比如：Real:score,height -Real:score,height -该语句定义该语句定义2 2个实型变量个实型变量2024/8/30 周五周五82 2、隐含说明语句、隐含说明语句implicitimplicit这这种种说说明明语语句句把把以以某某个个字字母母或或某某些些字字母母开开头头的的变变量量规规定定为为所所需需的类型，格式为：的类型，格式为：Implicit Implicit 类型说明符类型说明符（字母表）（字母表）比比如如：Implicit Implicit integer(a,c,r-v)integer(a,c,r-v)-表表示示以以字字母母a a、以以字母字母c c、及以字母、及以字母r r、s s、t t、u u、v v开头的变量均为整型变量。开头的变量均为整型变量。注注意意：字字母母表表之之间间用用“,”、字字母母范范围围用用“-”、末末尾尾不不用用“.”。3 3、隐含约定隐含约定FortranFortran语语言言规规定定，以以i,j,k,l,m,ni,j,k,l,m,n开开头头的的变变量量被被当当作作整整型型变变量量，常又称为常又称为I IN N规则规则。例例如如：在在没没有有前前面面2 2种种说说明明的的情情况况下下，i1i1、mCAmCA、N3sN3s等等均均为为整整型变量。型变量。2024/8/30 周五周五9关于变量的类型说明，还需要注意：关于变量的类型说明，还需要注意：1、IN规规则则在在Fortran77中中经经常常使使用用，但但是是其其有有一一定定的的副副作作用用，比比如如，隐隐含含说说明明与与强强制制说说明明一一同同使使用用时时，变变量量类类型型不不清清楚楚，因因此此，在在Fortran90中中不不主主张张使使用用，这这需需要要在在程程序序变变量量说说明明之之前加入：前加入：implicit none语句语句来来取消取消IN规则规则。2、3种种变变量量类类型型说说明明方方式式中中，强强制制说说明明优优先先级级别别最最高高、隐隐含含说说明明Implicit次次之之、IN规规则则级级别别最最低低，就就是是说说，当当变变量量被被强强制制定定义义为为某某种种类类型型之之后后，Implicit 语语句句和和IN规规则则对对它它就就不不起起作用了。作用了。3、Implicit语语句句和和强强制制说说说说明明明明语语语语句句句句，均均为为非非可可执执行行语语句句，Fortran 规规定定：在在编编程程序序时时，要要把把它它们们放放放放在在在在所所所所有有有有可可可可执执执执行行行行语语语语句句句句的前面的前面的前面的前面。2024/8/30 周五周五10三、三、三、三、FortranFortranFortranFortran的的的的内部函数内部函数内部函数内部函数（1 1）什么是内部函数）什么是内部函数在在编编程程序序时时，经经常常需需要要直直接接使使用用数数学学函函数数，为为方方便便FortranFortran语语言言自自带带有有丰丰富富的的数数学学函函数数，称称为为内内部部函函数数，它它是是指指能能完完成成一一定定功功能能的的程程序序单单位位，内内部部函函数数可可以以直直接接调调用用，但但需需遵遵守守其其使使用用规规则则。（2 2）常见的一些内部函数）常见的一些内部函数作为例子，下面给出一些作为例子，下面给出一些FortranFortran的内部函数：的内部函数：1 1、abs(x)-abs(x)-求变量求变量x x的绝对值；的绝对值；2 2、sqrt(x)-sqrt(x)-求变量求变量x x的平方根；的平方根；3 3、int(x)-int(x)-取取x x的整数部分；的整数部分；4 4、mod(x,y)-mod(x,y)-求求x x除以除以y y的余数；的余数；5 5、sign(x,y)-sign(x,y)-求求x x和和y y的符号；的符号；6 6、max(x,y,z,max(x,y,z,)-)-求最大值；求最大值；7 7、min(x,y,z,min(x,y,z,)-)-求最小值。求最小值。2024/8/30 周五周五118 8、exp(x)-exp(x)-求自然指数运算；求自然指数运算；9 9、log(x)-log(x)-求求以以以以e e e e为底为底为底为底的对数（即自然对数）；的对数（即自然对数）；1010、log10(x)-log10(x)-求求以以以以10101010为底为底为底为底的对数（即常用对数）。的对数（即常用对数）。1111、sin(x)-sin(x)-求正弦；求正弦；1212、tan(x)-tan(x)-求正切；求正切；1313、asin(x)-asin(x)-求反正弦；求反正弦；1414、atan(x)-atan(x)-求反正切。求反正切。（3 3）内部函数的使用）内部函数的使用在在使使用用FortranFortran内内部部函函数数时时，一一定定要要遵遵守守其其规规则则，否否则则程程序序将将出错甚至不能运行：出错甚至不能运行：1 1、FortranFortran内部函数调用格式：内部函数调用格式：函数名函数名（自变量自变量）例如：例如：sin(90*3.14159/180)1.0；sqrt(9.0)3.0；abs(-5.6)5.6；int(6.75)6；exp(3.0)20.085540其中自变量（常数）必须用括号括起来，比如：其中自变量（常数）必须用括号括起来，比如：sinx+cosx sin(x)+cos(x)sinx+cosx sin(x)+cos(x)2024/8/30 周五周五122 2、内内部部函函数数含含有有多多个个自自变变量量（参参数数）时时，它它们们之之间间用用“,”分分隔隔，但，但末尾不能使用末尾不能使用“.”。比如，。比如，sin(x)sin(x)、mod(m,n)mod(m,n)等。等。3 3、函函数数的的自自变变量量（参参数数）和和函函数数值值都都是是有有相相应应的的数数据据类类型型的的，比比如如，mod(m,n)mod(m,n)中中的的自自变变量量及及函函数数值值都都是是整整型型变变量量，而而sin(x)sin(x)中的自变量和函数值则均为中的自变量和函数值则均为实型实型变量。变量。4 4、所所有有函函数数都都必必须须遵遵循循其其原原有有的的数数学学规规则则，比比如如负负数数不不能能开开平方根，实数不能求余，负数不能求对数等。平方根，实数不能求余，负数不能求对数等。5 5、要要注注意意与与数数学学中中函函数数之之间间的的某某些些差差异异，比比如如，log(x)log(x)表表示示求自然对数（即求自然对数（即lnxlnx）而非数学上的求常用对数）而非数学上的求常用对数(logx)(logx)。6 6、注意函数自变量的单位，比如、注意函数自变量的单位，比如sind(x)sind(x)中中x x取弧度。取弧度。（4 4）、函数运用的例子）、函数运用的例子比如，求比如，求3 3个数个数x,y,zx,y,z的最大值可以表示为：的最大值可以表示为：Max(x,y,z)Max(x,y,z)又又如如，判判断断一一个个自自然然数数M M是是否否为为另另一一个个自自然然数数N N的的因因数数，通通过过Mod Mod（M,NM,N）是是否否为为零零可可以以判判断断：如如果果为为则则是是的的因因数数，否否则则说说明不能被整除，即明不能被整除，即Mod(m,n)0Mod(m,n)0。2024/8/30 周五周五13四、四、四、四、FortranFortranFortranFortran的的的的算术表达式算术表达式算术表达式算术表达式（1 1）什么表达式）什么表达式将各常量、变量、函数用将各常量、变量、函数用运算符运算符连接起来的式子称为连接起来的式子称为表达式表达式。根据运算符的不同，表达式分为以下根据运算符的不同，表达式分为以下种种：、算术表达式算术表达式、字符表达式、字符表达式、关系表达式关系表达式、逻辑表达式、逻辑表达式此此处处先先介介绍绍算算术术表表达达式式-将将各各种种运运算算元元素素（常常量量、变变量量、函函数）用数）用算术运算符算术运算符连接起来的一个连接起来的一个有值式子有值式子。（）（）算术运算符及其优先级算术运算符及其优先级、有、有6 6种种算术运算符算术运算符加（加（+）减（减（-）乘（乘（*）除（除（/）乘方（乘方（*）括号括号()()、算术运算符的优先级、算术运算符的优先级 括号括号函数函数乘方乘方乘、除乘、除加、减加、减注：注：同级同级运算运算“先左后右先左后右”，连续乘方连续乘方时时“先右后左先右后左”。比如：比如：3+5-6.0*8.5/4*2+sin(x)3+5-6.0*8.5/4*2+sin(x)3+5-6.08.543+5-6.08.542 2+sinx+sinxx*y*zx*y*z、x*(y*z)x*(y*z)x xyzyz(x*y)*z(x*y)*z (x(xy y)z z利用算术表达式概念，就可以将：利用算术表达式概念，就可以将：数学运算式数学运算式FortranFortran算术表达式算术表达式2024/8/30 周五周五14（3 3）Fortran Fortran 算术表达式书写注意算术表达式书写注意、表达式中的各运算元素之间必须用运算符分隔。、表达式中的各运算元素之间必须用运算符分隔。例：例：xyzx*y*z 2(x+y)2*(x+y)xyzx*y*z 2(x+y)2*(x+y)、作任何运算的表达式只能写在一起。、作任何运算的表达式只能写在一起。例：例：(a+b)/(c+d)a+b/c+d(a+b)/(c+d)a+b/c+d 3 3、表达式一律用小括号：、表达式一律用小括号：ax+b(y+c)a*(x+b*(y+c)4、算术表达式中的乘号不可省略，如、算术表达式中的乘号不可省略，如3*x不能写成不能写成3x。（）算术表达式求值时的数据类型的处理（）算术表达式求值时的数据类型的处理 1 1、同类型量运算的结果，仍为原类型。、同类型量运算的结果，仍为原类型。例：例：4*5=204*5=20，4.0*5.0=20.04.0*5.0=20.0，6.0/4.0=1.56.0/4.0=1.5，6/4=16/4=1（1.51.5）2 2、不不同同类类型型量量运运算算时时，先先将将低低级级类类型型（整整型型）转转换换为为高高级级类类型型（实型实型），然后），然后再按同类型量进行运算再按同类型量进行运算。例：例：2.5*4=10.02.5*4=10.0（1010）2.0*3=2.0*2.0*2.0=8.02.0*3=2.0*2.0*2.0=8.0（属同类型量运算属同类型量运算）2024/8/30 周五周五152024/8/30 周五周五162 Fortran2 Fortran程序中的基本语句程序中的基本语句在在FortranFortran程程序序中中，最最为为基基本本的的语语句句包包括括（给给变变量量）赋赋值值语语句句、（数数据据）输输入入语语句句、（数数据据）输输出出语语句句、以以及及一一些些（程程序序执执行的）行的）控制语句控制语句等。等。一、赋值语句一、赋值语句一、赋值语句一、赋值语句在在FortranFortran程程序序中中，需需要要给给变变量量“值值”，即即赋赋赋赋值值值值，其其实实在在所所有有的高级语言中最基本的语句就是的高级语言中最基本的语句就是赋值语句赋值语句赋值语句赋值语句。（1 1）赋值语句的格式）赋值语句的格式变量名变量名=表达式表达式功功能能：把把赋赋值值号号右右边边表表达达式式的的值值，赋赋给给赋赋值值号号左左边边的的变变量量，即将表达式的值存放到变量所对应的存储单元。即将表达式的值存放到变量所对应的存储单元。例例：pi=3.14156 pi=3.14156 S=3.14159*r*2 N=N+1S=3.14159*r*2 N=N+12024/8/30 周五周五17（2 2）赋值时数据类型的转换）赋值时数据类型的转换 执执行行赋赋值值语语句句就就是是把把赋赋值值号号“右右边边”给给左左边边的的“变变量量”，因此：，因此：1 1、当当当当右右右右边边边边数数数数据据据据类类类类型型型型与与与与变变变变量量量量的的的的数数数数据据据据类类类类型型型型相相相相同同同同时时时时：表表达达式式运运算算完完毕、直接赋值，比如：毕、直接赋值，比如：integer N real x,yinteger N real x,y N=N+1 y=2.5*x*2 N=N+1 y=2.5*x*22 2、当当左左左左右右右右两两两两边边边边数数数数据据据据类类类类型型型型不不不不同同同同时时时时：右右边边的的先先按按原原规规则则计计算算、再再转换为左边变量相同的类型，然后将值赋给左边的变量。转换为左边变量相同的类型，然后将值赋给左边的变量。例如，例如，integer Ninteger N N=3.33*3 N=3.33*3 ！(最后最后N N为为9)9)看一段程序：看一段程序：Integer m,n x=5/2Integer m,n x=5/2Real x,y y=5.0/2Real x,y y=5.0/2M=5/2 M=5/2 结果结果结果结果:M=2M=2，N=2 N=2 N=5.0/2 x=2.0N=5.0/2 x=2.0，y=2.5y=2.5（1 1）表控输入（）表控输入（自由格式自由格式）输输输输入入入入数数数数据据据据又又叫叫读读读读入入入入数数数数据据据据”，因因此此，在在FortranFortranFortranFortran中中中中用用用用readreadreadread语语语语句句句句实实现现数数据据输输入入。而而表表控控输输入入方方式式就就是是从从键键盘盘自自由由地地将将数数据据敲敲入计算机内存（即变量）中。（入计算机内存（即变量）中。（输入实质给变量一个值输入实质给变量一个值输入实质给变量一个值输入实质给变量一个值）2024/8/30 周五周五18二、简单的二、简单的二、简单的二、简单的输入输入输入输入、输出输出输出输出语句语句语句语句程程序序是是处处理理数数据据的的，因因此此，经经常常要要在在外外外外部部部部设设设设备备备备与与与与计计计计算算算算机机机机之之之之间间间间传递数据传递数据传递数据传递数据，即使用输入和输出语句，需要弄清：，即使用输入和输出语句，需要弄清：使用的是什么设备；使用的是什么设备；采用什么样的数据格式；采用什么样的数据格式；输入、输出的数据内容。输入、输出的数据内容。表控输入表控输入表控输入表控输入的的一般格式为一般格式为：read*,read*,变量列表变量列表变量间用变量间用变量间用变量间用“，”分隔，也可采用下面的格式：分隔，也可采用下面的格式：分隔，也可采用下面的格式：分隔，也可采用下面的格式：read(read(*,*),*)变量列表变量列表2024/8/30 周五周五19例例如如：表表控控输输入入语语句句read*,x,y,zread*,x,y,z或或者者read(*,*)x,y,zread(*,*)x,y,z就就是是要要从键盘上把从键盘上把3 3个实数（比如个实数（比如1.2,3.61.2,3.6、5.85.8）给变量）给变量x x、y y、z z。此外，还需注意：此外，还需注意：1 1、通通常常数数据据与与变变量量是是一一一一对对应应的的，但但是是，如如果果数数据据多多变变量量少少，则则多多多多余余余余的的的的数数数数据据据据不不不不起起起起作作作作用用用用；而而数数据据少少变变量量多多，则则多多多多出出出出的的的的变变变变量量量量将将将将等待输入等待输入等待输入等待输入。在键盘上操作时，要分隔多个数据，在键盘上操作时，要分隔多个数据，有有有有3 3 3 3种方法种方法种方法种方法：1 1、敲入、敲入1 1个数据，键入个数据，键入1 1个回车；个回车；2 2、敲入、敲入1 1个数据，键入个数据，键入1 1个个“,”,”，敲完数据最后来个回车；，敲完数据最后来个回车；3 3、敲入、敲入1 1个数据，键入个数据，键入1 1个空格，敲完数据最后来个回车。个空格，敲完数据最后来个回车。比如，比如，Read*,x,y,zRead*,x,y,z1.21.2 2.3 2.3 3.6 3.6 1.2,1.2,2.3,2.3,3.6 3.6 1.2 1.2 2.32.3 1.4 1.42024/8/30 周五周五202 2、当、当多个输入语句并列使用时，一个多个输入语句并列使用时，一个多个输入语句并列使用时，一个多个输入语句并列使用时，一个readreadreadread语句对应一行语句对应一行语句对应一行语句对应一行。如：。如：read*,m,nread*,m,nread*,x,yread*,x,y 2,3 2,3 1.5,3.9 3 3、在在输输入入数数据据时时若若出出出出现现现现“/”，则则则则终终终终止止止止对对对对此此此此readreadreadread语语语语句句句句的的的的输输输输入入入入，后面的变量将不再赋值。后面的变量将不再赋值。例：例：例：例：read*,x,y,zread*,x,y,zread*,x,y,zread*,x,y,z 键盘输入：键盘输入：1.5,2.5/3.91.5,2.5/3.9（变量变量变量变量z z z z将得不到赋值将得不到赋值将得不到赋值将得不到赋值）4 4、数数数数据据据据与与与与变变变变量量量量的的的的类类类类型型型型要要要要尽尽尽尽量量量量保保保保持持持持一一一一致致致致，但但也也允允允允许许许许高高高高级级级级变变变变量量量量接接接接受受受受低低低低级级级级数数数数据据据据，比比如如，整整型型变变量量不不能能接接受受实实型型数数据据，但但实实型型变变量可以接受整型数据（最后变量取实数）。量可以接受整型数据（最后变量取实数）。2024/8/30 周五周五21（2 2）表控输出）表控输出就是把计算机内的数据显示在显示器，采用的一般格式为：就是把计算机内的数据显示在显示器，采用的一般格式为：Print*,Print*,输出项列表输出项列表或者：或者：write(*,*)write(*,*)输出项列表输出项列表注意：注意：注意：注意：1 1、其其中中输输出出内内容容可可以以是是常常量量、变变量量、表表达达式式、字字符符串串等等，它它们们之之间间使使用用“,”分分隔隔。如如果果输输出出的的是是“字字符符串串”，则则要要用用英英文的单引或双引号引起。比如，文的单引或双引号引起。比如，Print*,xPrint*,xPrint*,Print*,x=x=,x,x,”y=y=”,y,yPrint*,Print*,”最最 大大 的的 数数 是是:”,max,max,”最最 小小 的的 数数 是是:”,min,min2 2、如如果果输输出出的的是是表表达达式式，则则其其还还具具有有计计计计算算算算功功功功能能能能，可可显显示示出出表表达式的结果。达式的结果。3 3、每每条条输输出出语语句句在在单单独独的的一一行行显显示示，因因此此，单单独独使使用用一一个个print*print*语句，语句，表示换行表示换行表示换行表示换行（即显示一空行）。（即显示一空行）。Implicit noneImplicit noneInteger m,nInteger m,nRead*,m,n,n,mRead*,m,n,n,mm=m+nm=m+nn=m+nn=m+nPrint*,m,nPrint*,m,nEndEnd键盘输入：键盘输入：7 7，8 8，9 9，10 10 输出结果输出结果:m=19 n=28Read*,a,b,cRead*,a,b,cmaxnum=max(a,b,c)maxnum=max(a,b,c)minnum=min(a,b,c)minnum=min(a,b,c)Print*,Print*,”最大的数是最大的数是”，maxnummaxnumPrint*Print*Write(*,*)Write(*,*)”最最小小的的数数是是”,minnum,minnumEndEnd键盘输入：键盘输入：7.27.2，8.08.0，9.1 9.1 输出结果输出结果:最大的数是最大的数是9 最小的数是最小的数是72024/8/30 周五周五22三、控制语句三、控制语句三、控制语句三、控制语句pausepausepausepause语句语句语句语句PausePause语语句句是是暂暂停停语语句句，使使程程序序“暂暂时时停停止止运运行行”，这这时时不不是是“结结束束运运行行”，而而只只是是把把系系统统程程序序暂暂时时挂挂起起来来，按按回回车车键键可可以恢复运行。其使用格式为：以恢复运行。其使用格式为：Pause NPause N比如：比如：parameter(r=0.5,pi=3.14159)parameter(r=0.5,pi=3.14159)s=pi*r*2 s=pi*r*2 h=2.0*pi*r h=2.0*pi*r pause pause 打印面积和周长打印面积和周长 print*,s,h print*,s,h end end程程序序中中可可以以允允许许使使用用多多个个pausepause语语句句，有有意意识识的的使使用用pausepause语语句句相相当当于于在在程程序序中中设设置置断断点点，把把程程序序分分成成几几段段，便便于于程程序序一一段一段的调试检查，使用完毕再把段一段的调试检查，使用完毕再把pausepause语句删除。语句删除。2024/8/30 周五周五232024/8/30 周五周五241 1、自自由由落落体体公公式式 ，其其中中v v0 0是是初初速速、g g是是重重力力加加速速度度、t t为为经经历历的的时时间间。编编写写程程序序求求t=0.5t=0.5秒秒时时的的位位移移s s。设设v v0 0=4.8m.s=4.8m.s-1-1，g=9.81m.sg=9.81m.s-2-2，要要求求把把g g定定义义为为符符号号常常量量，而而v v0 0和和t t的值从键盘输入。的值从键盘输入。2 2、编编写写一一个个程程序序，其其功功能能是是：从从键键盘盘输输入入一一个个四四位位数数，计计算算并输出该数各位数字之和。并输出该数各位数字之和。3 3、一一个个笼笼中中有有鸡鸡、兔兔若若干干只只，共共m m个个头头、n n只只脚脚，编编程程求求当当m=30m=30、n=90n=90时，笼中鸡、兔各多少只。时，笼中鸡、兔各多少只。本本讲讲介介绍绍了了最最基基本本的的数数据据（整整型型、实实型型；常常量量、变变量量、算算术术表表达达式式、内内部部函函数数）和和最最简简单单的的语语句句（赋赋值值语语句句、表表控控输输入入输输出出语语句句、暂暂停停语语句句），也也知知道道了了顺顺序序结结构构程程序序就就是是按按照照处处理的顺序编写语句、执行运行的一种基本的程序结构。理的顺序编写语句、执行运行的一种基本的程序结构。3 3 顺序结构程序设计（顺序结构程序设计（上机上机）2024/8/30 周五周五25参考程序参考程序program mainprogram mainParameter(g=9.81)Parameter(g=9.81)Real v0,t,sRead*,v0,tRead*,v0,tS=vo*t+0.5*g*t*2S=vo*t+0.5*g*t*2Print*,Print*,位移是：位移是：,s,s,”米米”EndEnd从键盘上输入：从键盘上输入：4.8,0.5 4.8,0.5 输出结果：输出结果：位移是位移是 3.626250米米program mainprogram mainInteger m,n1,n2,n3,n4,sInteger m,n1,n2,n3,n4,sRead*,mRead*,mn1=m/1000n1=m/1000n2=mod(m/100,10)n2=mod(m/100,10)n3=mod(m/10,10)n3=mod(m/10,10)n4=mod(m,10)n4=mod(m,10)S=n1+n2+n3+n4S=n1+n2+n3+n4Write(*,*)Write(*,*)”输入的四位整数是：输入的四位整数是：”,m,mPrint*,Print*,各位上数字之和是：各位上数字之和是：,s,sEndEnd从键盘上输入：从键盘上输入：12341234 输出结果：输出结果：输入的四位整数是：输入的四位整数是：1234 各位上数字之和是：各位上数字之和是：102024/8/30 周五周五262024/8/30 周五周五27program mainprogram mainInteger m,n,mj,mtRead*,m,nRead*,m,nMj=2*m-n/2Mj=2*m-n/2Mt=n/2-mMt=n/2-mPrint*,Print*,鸡有：鸡有：,mj,mj,只只Print*Print*Write(*,*)Write(*,*)”兔是：兔是：”,只只EndEnd从键盘上输入：从键盘上输入：50,160 50,160 输出结果：输出结果：鸡有：鸡有：20只只 兔是：兔是：30只只