大学FORTRAN考试试题1

合集下载

大学Fortran期末复习资料-Fortran程序设计_05

20XX年复习资料

大

学

复

习

资

料

专业：

班级：

科目老师：

日期：

一、选择题（每题2分，共30分）

1. 下列数据中，不符合FORTRAN 90常量表示法的是__________。

A. -23.4

B. 2.758D+3

C. (3, 4)

D. TRUE

2. 数学表达式()()

27log t b a e t -•+•在FORTRAN 中的正确的表达式为__________。

A. E**T*LOG*(A+B)*(-7*SQR(T))

B. EXP(T)*LOG20XXXX(A+B)*(-7*T**2)

C. EXP(T)*LN(A+B)*(-7*SQR(T))

D. E**T*LOG(A*B)*(-7*T**2)

3. 下列名称中，符合FORTRAN90/95命名规则的是__________。

A. a3_b

B. “Pi ”

C. 2XY

D. .false.

4. 下列循环语句执行后，输出k 的值分别是__________。

DO K=2，20XXXX ，4

IF(MOD(K,20XXXX)= =0) WRITE(*,*) K+1

WRITE(*,*) K

END DO

WRITE(*,*) K

A. 2 6 20XXXX 20XXXX 20XXXX

B. 2 6 20XXXX 20XXXX 20XXXX

C. 2 6 20XXXX 20XXXX 20XXXX

D. 2 6 20XXXX 20XXXX 20XXXX 20XXXX

5. 阅读下列程序

PROGRAM A

READ(*,20XXXX0)X,Y

20XXXX0 FORMAT(1X,2F3.1)

2018-2019学年第一学期《FORTRAN》期末试卷(A)

2018-2019学年第一学期《FORTRAN》期末试卷（A）（考试对象：农水、港航、地质、海洋、力学专业2018级）学院专业班级学号姓名成绩

一、选择题(用铅笔把选中的方格涂黑32×1=32分)

5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28

29 30 31 32

二、填空题（每空占一行，每行写一个答案25×2=50分）

10.

11.

12. 13.

14.

15.

16.

17.

18.

19.

20.

21.

22.

23.

24.

25.

三、程序设计（2×9=18分）

1、求裴波纳契数列的前10项，要求每行输出5项。该数列的前几项为：0，1，

1，2，3，5，8，13，……

2、编写一个判断素数的函数子程序, 主程序调用函数求3-100之间满足下面条件的各组素数：每组三个素数，第二个比第一个大2，第三个比第二个大4。例如5、7、11就是满足条件的一组。

一、选择题（32×1=32分）

1、以下有关FORTRAN90基本概念的叙述中，正确的是。

A、关键字只能用大写字母，其他符号名（变量名、数组名、过程名等）只能用小写字

母。

B、符号名须以英文字母开头，可后接英文字母、数字、下划线，不超过31个字符。

C、键盘上的可见字符均可作字符型常数使用，但汉字不能作字符型常数使用。

D、编译系统接受英文字母开头后接希腊字母作符号名。

2、在下列写法中，________不是FORTRAN常量。

A、 .TRUE.

B、1E-2

大学FORTRAN考试试题样题（1）

《高级语言程序设计(FORTRAN)》考试样题

一、选择题(每小题2分,共40分)

1. 下列标识符中不能作为FORTRAN的合法变量名的是_____D_____。

A) A_1 B) A1 C) A1A D) A+1

2. 在FORTRAN的变量类型说明语句中没有 B

A) REAL语句B)CHAR语句C)INTEGER语句 D)LOGICAL语句

3．FORTRAN90 源程序的扩展名是 C 。

A. TXT

B. F

C. F90

D. FOR

4.下列关于符号常量的说法正确的是___C____。

A.符号常量的定义应该放在所有语句之前

B.符号常量不可以是字符型常量

C.在一个程序单位中定义一个符号常量后，不能再改变它的值

D.符号常量定义语句与赋值语句一样，是可执行语句

5、在下列写法中，__D______不是FORTRAN常量。

A. .TRUE.

B.1E-2

C. (0.0,2.4)

D.1,000,000

6．表达式15／4／2.0的值是 B 。

A．整数2 B．实数1．5 C．实数2．25 D．实数1. 3

7. 下列不是FORTRAN赋值语句的是 _____D______。

A) X=.TRUE. B) X=X*X C) X=X**2**2 D) X=X++

8. 梯形的上底为A,下底为B,高为H,计算其面积的FORTRAN表达式中错误的是____A____。

A)1/2*(AB)*H B)(A+B)*H/2 C)(A+B)/2*H D)0.5*(A+B)*H

9. 要选拔身高T>1.7米且体重W<62.5公斤的人,FORTRAN的逻辑表达式是__C_____。

fortran

江苏省高等学校非计算机专业学生

计算机基础知识和应用能力等级考试上机试卷（2008年春）

二级FORTRAN90 语言（试卷代号F01）

（本试卷完成时间70分钟）

一、改错题（20分）

【题目】找到所有符合以下条件的4位正整数：⑴该数除以其后两位数字组成的数之商是完全平方数；⑵该平方数恰好等于前两位数字组成的数加1之平方；⑶该数本身不是完全平方数。例如1805÷5=(18+1)2，1805不是完全平方数，1805即为所需寻找的数之一。遍历所有四位整数，无参过程resolve将4位数分解成左右两个两位数。含有错误的源程序如下：

LOGICAL FUNCTION check(n) RESULT(log)

IMPLICIT NONE

LOGICAL::log

INTEGER::n,left,right,tmp1,tmp2

REAL::temp,eps=1E-15

CALL resolve

tmp1=n/right; tmp2=sqrt(n+eps)

log=.FALSE.

temp=SQRT(tmp1+eps)

IF(INT(temp)**2==tmp1 .OR. tmp2**2/=n)THEN

IF((left+1)**2==tmp1)THEN

log=.TRUE.

ENDIF

CONTAINS

SUBROUTINE resolve

right=MOD(n,100)

left=(n-right)/10

END SUBROUTINE resolve

END FUNCTION check

PROGRAM strange

IMPLICIT NONE

fortran课后习题

f(0)=0 f(1)=1 write(*,*) f(0) write(*,*) f(1) do n=2,9 f(n)=f(n-1)+f(n-2) write(*,*) f(n) end do end 7.4 program main implicit none integer::a(10)=(/5,3,6,4,8,7,1,9,2,10/) integer::i,j integer t do i=1,9 do j=i+1,10 if(a(i)<a(j)) then t=a(i) a(i)=a(j) a(j)=t end if end do end do write(*,"(10I4)") A end
Байду номын сангаас
write(*,*)"一年有366天" else if(mod(day,100)==0.and.mod(day,400)==0) then write(*,*)"一年有366天" else write(*,*)"一年有365天" end if End 6.1 method one: program main implicit none integer counter do counter=1,5 write(*,*)"Fortran" end do end method two: program main implicit none integer counter counter=1 do while(counter<=5) write(*,*)"Fortran" counter=counter+1 end do end 6.2 program main implicit none integer counter integer::ans=0 counter=1 do while(counter<100) ans=ans+counter counter=counter+2 end do

fortran 编程练习题

5.编写程序输出杨辉三角。
program main implicit none integer i,j,n integer a(1:50,1:50)
write(*,*) " 请输入杨辉三角的阶数" read(*,*) n do i = 1, n
a(i,1) = 1 a(i,i) = 1 end do
do i= 2,n-1 do j = 1,i-1 a(i+1,j+1)=a(i,j)+a(i,j+1) end do end do
write(*,*) "杨辉三角的展开式为：" do i =1,n write(*,"(1x,100i6)") (a(i,j),j=1,i) end do
write(*,*)"调整后输出展开式为:" write(*,"(28x,100i6)") a(1,1) write(*,"(25x,100i6)") (a(2,i),i=1,2) write(*,"(22x,100i6)") (a(3,i),i=1,3) write(*,"(19x,100i6)") (a(4,i),i=1,4) write(*,"(16x,100i6)") (a(5,i),i=1,5) write(*,"(13x,100i6)") (a(6,i),i=1,6) write(*,"(10x,100i6)") (a(7,i),i=1,7) write(*,"(7x,100i6)") (a(8,i),i=1,8) write(*,"(4x,100i6)") (a(9,i),i=1,9) write(*,"(1x,100i6)") (a(10,i),i=1,10) end

Fortran练习题

● 1.输出a，b，c的值，其中a=28,b=34,c=60.5

integer a,b,c定义整型integer

a=28;b=34;c=60.5‘=’为赋值符号，把右赋给左

print*,'a=',a,'b=',b,'c=',c输出格式：print*,’文字内容’,该输出变量

end结束必须以end作结

● 2.输出x和y的值

real x,y定义实型real

print*,'输入x和y:'

read*,x,y读入格式：read*,读入变量

print*,x,y

end

● 3.求三个数的和及平均值

real sum,ave

read*,a,b,c

sum=a+b+c

ave=sum/3

print*,'和为',sum

print*,'平均值为',ave

end

● 4.现有长1500m宽1000m的地块要拍卖建造住宅小区，地块中央有一半径为100m的

圆形公共绿地不属于拍卖范围，每平方米地价为0.5万元，编写程序计算该地块拍卖总价，并输出。

real area,money

read*,a,b,r

area=a*b-3.14*r**2a b为a**b

money=area*0.5

print*,'总价为',money,'万元'

print*,'地长为',a

print*,'地宽为',b

print*,'绿地半径为',r

end

● 5.求三个数中的最大数与最小数

real max_x,min_x

read*,a,b,c

min_x=a

if(b

end if if后必有end if作结

if(c

min_x=c

end if

max_x=a

if(b>max_x)then

哈尔滨工程大学数值分析大作业2014-附fortran程序

B班大作业要求：

1. 使用统一封皮；

2. 上交大作业内容包含：

一摘要

二数学原理

三程序设计（必须对输入变量、输出变量进行说明；编程无语言要求，但程序要求通过）四结果分析和讨论

五完成题目的体会与收获

3. 提交大作业的时间：本学期最后一次课，或考前答疑；过期不计入成绩；

4. 提交方式：打印版一份；或手写大作业，但必须使用A4纸。

5. 撰写的程序需打印出来作为附录。

课程设计

课程名称：

设计题目：

学号：

姓名：

完成时间：

题目一：非线性方程求根一摘要

非线性方程的解析解通常很难给出，因此非线性方程的数值解就尤为重要。本实验通过使用常用的求解方法二分法和Newton 法及改进的Newton 法处理几个题目，分析并总结不同方法处理问题的优缺点。观察迭代次数，收敛速度及初值选取对迭代的影响。

用Newton 法计算下列方程

（1） 310x x --= ，初值分别为01x =，00.45x =，00.65x =；

（2） 32943892940x x x +-+= 其三个根分别为1,3,98-。当选择初值02x =时给出结果并分析现

象,当6

510ε-=⨯，迭代停止。

二数学原理

对于方程f(x)=0，如果f(x)是线性函数，则它的求根是很容易的。牛顿迭代法实质上是一种线性化方法，其基本思想是将非线性方程f(x)=0逐步归结为某种线性方程来求解。

设已知方程f(x)=0有近似根x k (假定k f'(x )0≠) ，将函数f(x)在点x k 进行泰勒展开，有

k k k f(x)f(x )+f'(x )(x-x )+≈⋅⋅⋅

湖南省省二级计算机考试fortran题目精选

ProAnswer 33
2772
550
1400
1575
2142
2800
3000
6
20
5110
26
12
ProProblem 编写程序，求出 100 到 500 之间同时满足除 5 余 4 和除 7 余 2 条件的数的和。 * 编写程序，求出 100 到 600 之间同时满足除 3 余 2 和除 5 余 3 条件的数的个数。 * 编写程序，求出 1 到 2000 之间的能被 9 整除的前若干个数之和，当和值大于 500 时退出并输出和值。 * 编写程序，求出 1 到 3000 之间的能被 3 整除的前若干个数之和，当和值大于 600 时退出并输出和值。 * 编写程序，求出 1 到 300 之间同时满足除 3 余 2 和除 5 余 3 条件的数的个数。 * 编写程序，求出 1 到 4000 之间的能被 5 整除的前若干个偶数之和，当和值大于 400 时退出并输出和值。 * 编写程序，求出 1 到 400 之间同时满足除 3 余 2 和除 5 余 3 条件的数的个数。 * 编写程序，求出 1 到 5000 之间的能被 7 整除的前若干个数之和，当和值大于等于 1500 时退出并输出和值。 * 编写程序，求出 1 到 6000 之间的能被 5 整除的前若干个偶数之和，当和值大于 650 时退出并输出和值。 * 编写程序，求出 1 到 600 之间同时满足除 3 余 2 和除 5 余 3 条件的数的个数。 * 编写程序，求出 1 到 7000 之间的能被 5 整除的前若干个偶数之和，当和值大于 500 时退出并输出和值。 * 编写程序，求出 1 到 8000 之间的能被 5 整除的前若干个偶数之和，当和值大于 750 时退出并输出和值。 * 编写程序，求出 3 到 100 之间的所有非偶数非素数的数的个数。 *

大学FORTRAN语言试题

一、选择题（15×1分=15分）

1．Fortran程序设计语言允许使用的专用字符集是。

A．（），．；［］＋－＊／＝：空格B．（），．αβ＋－＊／＝：空格

C．（），．＋－＊／＄＇＝：空格D．｛｝，．；？＋－＊／＝：空格

２．按隐含规则确定变量的数据类型，Fortran表达式

（A112/BC1+15.123456789.0_8）-（1000.0_4/3.0+ABI*ABJ）

的值的数据类型为。

A．复型B．整型C．实型（种别为8）D．实型（种别为4）

3．执行循环语句DO I=0.5，4.5，1.5，正常退出循环后，循环执行的次数和循环变量I的值分别为。

A．4和4.5 B．5和5 C．4和6 D．5和6

4．语句A（M（I））=MOD（I，7）是。

A．函数定义语句B．赋值语句C．非法语句D．说明语句

5．下列不合法的是：_____

A．A<B<C<D B．.NOT.(X<0) C．A>B.EQV.C>D D．A.AND.B.AND.C

6．若数组说明符ARRAY（-5：5，-10：0）的元素个数为。

A．144 B．121 C．110 D．100

7．设循环初值、终值和增量分别为M1，M2和M3，循环次数的计算公式是。A．INT（（M2-M1）/M3）B．INT（（M2-M1）/M3）+1

C．MAX(INT(M2-M1+M3)/M3,0) D．MIN(INT(M2-M1+M3)/M3,0)

8．下列字符表达式中正确的是。

A．’ABCD’+’MN’’D’B．’ABCD’//’MN’’D’

大学FORTRAN考试试题1[1]

1．下列叙述中，正确的是(D )

A．语句标号的大小影响程度执行的顺序

B．程序完全按语句出现的先后顺序执行

C．不同程序单位不能有相同的语句标号

D．同一程序单位不能有相同的语句标号

2．下列标识符中，不能作为合法的FORTRAN90标识符的是( C) A．A3_B3 B．VOID C．_123 D．IF

3．下列哪一个为正确的常量( D )

A．123,000 B. 3.5E+2.5 C. TRUE D. “HELLO”

4．若A=2，B=2，I=3，则表达式A**B**I的值为( C )

A. 64

B.12

C.256 D16.

5．圆的直径存放在整型变量D之中，下列计算圆面积的表达式中正确的是( D )

A. 3.14159*（D/2）*（D/2）

B. 3.14159*(D*D/4)

C. 3.14159*(D/2)**2

D. 3.14159*D*D/4

6．下列运算符中，运算优先级最高的是(B )

A. 关系运算

B. 算术运算

C. 逻辑非运算

D. 逻辑与运算

7．下列FORTRAN的表达式中值为0.5的是( C)

A．MOD(4.8，0.5) B．100/20/10 C．50.0/4/25 D．MOD （15，10）/10

8．下列是完整的FORTRAN程序，编译时出错的语句是( C )

A．PROGRAM PRINT B．PARAMETER (PI=3.1415926)

C．PI=PI+1 D．WRITE(*，*)SIN(PI+0.5)

END

9．变量的类型定义中，优先级由高到低的顺序为( A )

FORTRAN90练习题

一．选择题

1．语句OPEN（3，FILE=‘ABC’）打开的是文件。

A．有格式顺序存取B．无格式顺序存取

C．有格式直接存取D．无格式直接存取

2．调用子程序时，假设实参可以是常数、内在函数及表达式，其相应形参是。

A．变量名B．数组名C．过程名D．*

3．下列数据中，不符合FORTRAN90常量表示的是。

A．-25.6 B．3.2344D0 C．’BOOT’’=’D．TRUE

4．圆心在原点的两个同心圆,半径分别为2和4。描述点(X,Y)在小圆外，大圆内(包括在两圆周上)的表达式是。

A．ABS（X）<=4.0 .AND. ABS(Y)>=2.0 B．2.0>=SQRT(X*X+Y*Y)<=4.0

C．X*X+Y*Y<=16.0 .AND. X*X+Y*Y>=4.0 D．（X.OR.Y）>=2.0 .AND. (X .OR.Y)<=4.0

5.下列字符串中可用作FORTRAN90变量名的是。

A．ABC B. A-BCD C. 2ABC D. AB.C

6.下列数据中不符合FORTRAN90常数表示的为。

A. 21.50

B. +0.0D0

C. .TRUE.

D. $1000

7.表达式：－B+SQRT(B*B-4.0*A*C).LE.3E-5值的类型是。

A. 逻辑型

B. 整型

C. 实型

D. 字符型

8.按隐含约定，设X=2.5,Y=1.0,Z=3.0, 执行赋值语句I=X+Y/Z后I的值为。

A. 2.0

B. 2

C. 3

D. 3.0

9.下列语句中那个语句是错误的是。

1997年西北工业大学硕士研究生微机原理及应用含FORTRAN语言

1997年西北工业大学硕士研究生微机原理及应用

(含FORTRAN语言)入学考试试题

一、(共20分，每小题2分)填空题

1. 若[x]补＝0011 001lB，[y]补＝1100 1100B，则[x—y]补＝________B，运行结果对状态标志ZF，SF，OF的影响为________，_________，____________。

2．在8086状态标志寄存器中，作为控制用的标志位有___________个；其中不可用指令操作的是__________。

3．设当前的SP＝100H，在执行PUSH指令后，SP＝___________H;若改为执行INT20指令，则SP＝_________H。

4. 在偏移地址为0624H单元内，有一条两字节JMP SHORT OBJ指令，当其位移量分别为27H和C6H时，转向地址OBJ的偏移地址分别为________H和___________H。

5．伪指令x DB 4 DUP(6，2DPU(6，8))

y DW 6800H

设x的偏移地址为2000H，则y的偏移地址为__________H，若执行指令MOV BL, LENGTH y，则BL＝________。

6．一个用16位二进制数表示的无符号定点整数所能表示的范围为________；一个16位浮点数的补码为0001 1001 1100 0000B，其中高6位为阶码部分，低10位为尾数部分，则浮点数十进制定点数为_________。

7．在执行NOT AL指令后，使与AL有相同值的指令可为___________。

fortran试题

软件技术基础(FORTRAN)笔试模拟试题

(带答案)

一．概念选择题（单选题，将正确的答案填入括号内。每题1分，共15分）

1. 已知整型变量L=5，M=13，N=4，表达式L*M/N 、L/N*M 和M/N*L 的值分别是（A ）。

A ）16 13 15

B ）16.25 16.25 16.25

C ）16.0 13.0 15.0

D ）16 16 16

2．将数学式

)||(ln 2

15-+e x 改写为FORTRAN 表达式，正确的是( D )。 A) 1/2*(LOG(ABS(X))+E**(-5))

B) 1.0/2*(LN(ABS(X))+E**-5)

C) 1/2.0*(LN(ABS(X))+E -5)

D) 1.0/2*(LOG(ABS(X))+EXP(-5))

3. 设A=.TRUE., B=.FALSE., C=.FALSE., 逻辑表达式(A.OR.B).AND.C 与A.OR..NOT.B 的值是( B )。

A) .T. 与 .F. B).F . 与 .T. C) .T. 与 .T. D) .F. 与 .F .

4. 数组REAL A （0:5，-1:5）的元素个数是（ D ）。

A ）25

B ）30

C ）36

D ）42 5. 下列数组说明符中错误的是（ A ）。

A ）K(3:2,1:2)

B ) K(-1:1,2)

C ）K(-2:2,-1:1)

D ）K(2:2,5)

6. 关于USE 语句的正确说法是（ C ）。

A)USE 语句是可执行语句 B)用USE 语句可以代替INCLUDE 语句

西安交通大学工程分析程序设计Fortran上机作业参考答案

. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .
. . . .

FORTRAN习题答案

习题⼆

⼀、问答题

1. 给出下⾯变量名称,哪些是合法变量？哪些是⾮法变量？说明原因。

Count 、num_2、x&y 、4x+5y 、china-suzhou 、$us 、AbCdE 、Mr.bai 、t5、

_another 、school_class_25、#125、2002Y 、π、β、A01/02、alpha 、date(1) 1. 判定下⾯整数,指出哪些是合法整数,哪些是⾮法整数？说明原因。

-0、+ 215、$125、3,245,895、5.3245、5#384、-524_3、#5DFE 、

23-345、16#1A2B 、38#ABCD 、8#275_2、+327890、4 #321

2. 判定下⾯实数,指出哪些是合法实数,哪些是⾮法实数？说明原因。

-0E2、45.2345E3.5、-5489E25_8、-.2345E-35、$185.45E 、+ 2.753425E24_3、 58D85、+0.E-0、-00000.001E5、5,443,223.44、-12 34E+2、+ 18.5E 18、2.5E42

习题三

⼀、选择题

1．下⾯是V isual Fortran 中正确的表达式是。

（A ）A*COS(X)+∣B ∣（B ）2*EXP(2*X)/SQRT(16.0)

（C ）B 2-4AC （D ）MOD （24.5,0.5）

2．下⾯算术赋值语句中正确的语句是。

（A ）M*N=(X-Y)/Z （B ）+R=A+B/C

（C ）X=Y=Z-1.0 （D ）Y=A*B/C/D