中南林业科技大学课程考试试卷 考试时间 填写： 年 课程名称： Fortran语言程序设计 ；试卷 学月院 日 编号：A 卷；考试时间：120分钟 考 专试用 题一 二 三 四 总业号 分 班应30 10 20 40 级 得年分 级 实 姓得名 分 学30分，每题2分） 号 一、填空题（ 得分 评卷复查人 人 1. Fortran语言中有：整数型 逻辑型 字符型 实数型 复数型五种基本数据类型。 2. Fortran程序的书写格式有两种固定格式 自由格式。 3. 字符型常数’this”s’的字符长度为6 4. 下列程序运行结果为125。 Program main 装订线(答题不得超过此线)
1
Implicit none Integer::floor=5,i Do i=1, floor If(i==3)cycle
If(i==4)cycle
Write(*,*)i End do end
5. 下列程序的运行结果为76.0,2.0。
Program main Implicit none Real :: a, b, m A=2.0 B=76.0
If(a Write(*,*) “a=”,a “b=”,b end 6. 下列程序的运行结果是10302。 Program test Implicit none Integer::sum,i sum=0.0 do i=1,203,2 sum=sum+i end do write(*,*) i end 7. 下列程序的运行结果是12000。 Program test Implicit none Integer::i 2 Integer::a(5)=(/ (i, i=1,5) /) Integer::b(5)=0 Where (a<3) b=a End where Write(*,”(5(i3,1x))”) b end 8. 下列程序的运行结果是30。 Program test Implicit none Integer,parameter:: limit=10 Integer counter Integer:: ans=0 Counter=2 do while(counter<=limit) ans=ans+counter counter=counter+2 end do Wrte(*,*)ans end 9. 下列程序的运行结果是2,3。 3