Fortran程序设计期末考试试题及详细答案

Fortran程序设计期末考试试题及详细答案考试说明：满分100分，考试时间120分钟，闭卷考试；适用Fortran90/95标准，所有程序代码可直接编译运行。一、单项选择题（共10题，每题3分，共30分）1.Fortran90程序的基本程序单元起始关键字为（）2.以下不属于Fortran合法变量名的是（）A、num_1B、SumTotalC、123dataD、x_y_z3.Fortran中默认的实型变量有效位数为（）A、6位B、10位C、15位D、任意位4.语句INTEGER,PARAMETER::N=100的作用是（）A、定义整型变量N，初始值100，可修改B、定义整型常量N，固定值100，不可修改C、定义数组N，包含100个元素D、无实际作用，仅注释语句5.Fortran中循环结构DO循环的终止条件是（）A、循环变量大于终值B、循环变量等于终值C、循环变量小于终值D、自定义任意条件6.以下逻辑表达式结果为真的是（）A、3>5B、2==3C、4>2.AND.1>0D、5<3.OR.2>47.Fortran数组默认的下标起始值为（）A、0B、1C、-1D、自定义8.用于输出数据的核心语句是（）A、READB、WRITEC、PRINTFD、SCAN9.子程序SUBROUTINE与函数FUNCTION的核心区别是（）A、子程序无返回值，函数有唯一返回值B、子程序不能嵌套，函数可以嵌套C、子程序执行速度更快D、无本质区别10.语句REAL::a(3,4)定义的数组包含元素个数为（）A、7B、12C、34D、48二、填空题（共5空，每空2分，共10分）1.Fortran程序中，单行注释语句以__________开头。2.表达式5/2的整型运算结果为__________，5.0/2.0的实型运算结果为__________。3.条件分支语句中，多分支判断的关键字是__________。4.结束整个程序运行的语句是__________。三、程序阅读题（共2题，每题10分，共20分）1.阅读以下程序，写出最终输出结果。fortran

PROGRAMtest1

IMPLICITNONE

INTEGER::i,s

s=0

DOi=1,5

s=s+i

ENDDO

PRINT*,s

ENDPROGRAMtest12.阅读以下程序，写出最终输出结果。fortran

PROGRAMtest2

IMPLICITNONE

REAL::a,b,t

a=3.5

b=2.8

IF(a>b)THEN

t=a

a=b

b=t

ENDIF

PRINT*,a,b

ENDPROGRAMtest2四、编程应用题（共2题，每题20分，共40分）1.编写Fortran程序，输入一名学生的语文、数学、英语三门课程成绩，计算并输出总成绩和平均成绩（平均成绩保留2位小数）。2.编写Fortran程序，利用DO循环计算1~100之间所有偶数的累加和，并输出最终结果。参考答案及详细解析一、单项选择题答案及解析2.C解析：Fortran变量名必须以字母开头，不能以数字开头，123data不符合命名规则。3.A解析：Fortran默认单精度实型变量有效数字为6位，双精度为15位。4.B解析：PARAMETER参数用于定义符号常量，赋值后数值固定，程序运行中无法修改。5.A解析：Fortran默认DO循环为递增循环，循环变量超过终值时终止循环。6.C解析：.AND.为逻辑与，两边条件均为真结果才为真，4>2和1>0均成立。7.B解析：Fortran数组默认下标从1开始，区别于C语言从0开始的规则。8.B解析：WRITE为Fortran标准输出语句，READ为输入语句，PRINTF不属于Fortran语法。9.A解析：FUNCTION函数必须有返回值，可直接参与表达式运算；SUBROUTINE子程序无返回值，通过形参传递数据。10.B解析：二维数组元素总数为行数×列数，3×4=12个元素。二、填空题答案1.!2.2、2.500000（单精度默认输出格式）3.ELSEIF4.STOP三、程序阅读题答案及解析1.输出结果：15解析：程序实现1~5的累加运算，初始s=0；循环依次累加1、2、3、4、5，最终0+1+2+3+4+5=15。2.输出结果：2.8000003.500000解析：程序实现两个变量数值交换。初始a=3.5、b=2.8，满足a>b条件，通过中间变量t完成数值互换，最终a=2.8，b=3.5。四、编程应用题参考答案（可直接编译运行）1.三门成绩计算程序fortran

!计算三门课程总成绩与平均成绩

PROGRAMscore_calc

IMPLICITNONE

REAL::chinese,math,english,total,avg

!输入三门成绩

PRINT*,"请输入语文、数学、英语成绩："

READ*,chinese,math,english

!计算总分和平均分

total=chinese+math+english

avg=total/3.0

!格式化输出，保留2位小数

PRINT'(A,F8.2)',"总成绩：",total

PRINT'(A,F8.2)',"平均成绩：",avg

ENDPROGRAMscore_calc程序说明：通过键盘输入三科成绩，完成数值计算，采用格式化输出语句固定小数位数，满足题目精度要求。2.1~100偶数累加和程序fortran

!计算1-100所有偶数累加和

PROGRAMeven_sum

IMPLICITNONE

INTEGER::i,sum

sum=0!初始化累加变量

!步长为2，直接遍历所有偶数

DOi=2,100,2

sum=sum+i

ENDDO

!输出结果

PRINT*,"1到100所有偶数的和为：",sum

ENDPROGRAMeven_sum程序说明：循环从2开始，步长设置为2，直接遍历1~100所有偶数，减少循环次数，计算结果为2550。也可通过判断i为偶数再累加实