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 将数学式 将数学式 改写为改写为 FORTRAN 表达式 正确的是表达式 正确的是 D ln 2 1 5 ex 1 2 LOG ABS X E 5 1 0 2 LN ABS X E 5 1 2 0 LN ABS X E 5 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 语句语句 C USE 语句必须放在程序单元体的开头语句必须放在程序单元体的开头 D USE 语句的位置任意语句的位置任意 7 语句语句 OPEN 9 FILE DATA TXT 打开的是 打开的是 B 文件 文件 A 无格式顺序 无格式顺序 B 有格式顺序 有格式顺序 C 无格式直接 无格式直接 D 有格式直接 有格式直接 8 阅读下列阅读下列 FORTRAN 程序程序 程序运行时执行循环体的次数是程序运行时执行循环体的次数是 A X 0 DO L 10 5 1 X X 1 0 ENDDO END A 0 B 1 C 6 D 无穷无穷 9 结构化程序设计中有三种基本结构 结构化程序设计中有三种基本结构 下列不属于三种基本设计结构的是下列不属于三种基本设计结构的是 D A 顺序结构顺序结构 B 选择结构选择结构 C 循环结构循环结构 D 嵌套结构嵌套结构 10 对链表中的数据元素的插入和删除对链表中的数据元素的插入和删除 B A 移动结点 不需要改变结点指针 移动结点 不需要改变结点指针 B 不移动结点 需要改变结点指针 不移动结点 需要改变结点指针 C 移动结点 并且需要改变结点指针 移动结点 并且需要改变结点指针 D 不移动结点 不需要改变结点指针 不移动结点 不需要改变结点指针 11 具有具有 12 个记录的序列 采用冒泡排序最多的比较次数是个记录的序列 采用冒泡排序最多的比较次数是 D A 1 B 144 C 11 D 66 12 下列形式中 不能作为形参的是 下列形式中 不能作为形参的是 C A 函数 函数 B 数组 数组 C 表达式 表达式 D 变量 变量 13 一个深度为一个深度为 k k 0 的满二叉树的结点数应满足 的满二叉树的结点数应满足 A A 2k 1 1 B 2k 1 C 2k 1 D 2 k 14 栈和队列都是栈和队列都是 D A 顺序存储线性表 顺序存储线性表 B 限制存取点的顺序存储线性表 限制存取点的顺序存储线性表 C 链式存储线性表 链式存储线性表 D 限制存取点的线性表 限制存取点的线性表 15 进行二分法查找 则线性表 进行二分法查找 则线性表 D A 必须以顺序方式存储必须以顺序方式存储B 必须以链接方式存储必须以链接方式存储 C 必须以链接方式存储 且数据元素已按值排好序必须以链接方式存储 且数据元素已按值排好序 D 必须以顺序方式存储 且数据元素已按值排好序必须以顺序方式存储 且数据元素已按值排好序 二 阅读程序 并写出下列各程序的运行结果 二 阅读程序 并写出下列各程序的运行结果 每题 每题 3 分 共分 共 15 分 分 1 CHARACTER LINE 19 DC 5 运行结果是 运行结果是 DC LINE DO K 16 12 1 LINE K 7 K 3 DC PRINT LINE DC K 11 K 11 LINE ENDDO END 2 INTEGER FUNCTION FUN M 运行结果是 运行结果是 4 3 M M 2 FUN M M END INTEGER A X 17 FUN A FUN X FUN X B FUN X FUN X PRINT A B END 3 INTEGER A 4 4 运行结果是 运行结果是 DO I 1 43 DO J 1 45 7 A I J I J 1 5 8 11 ENDDO3 7 11 15 ENDDO DO I 1 4 N 5 I WRITE 30 A I J J N 4 ENDDO 30 FORMAT 1X 4I3 END 4 INTEGER A 3 4 运行结果是 运行结果是 6 00 DATA A 12 0 DO M 1 3 DO N 1 4 CALL SUB A 3 4 M N END DO END DO WRITE f6 2 F A 3 4 END SUBROUTINE SUB P M N I J INTEGER P M N P I J J I END FUNCTION F P M N INTEGER P M N F 0 0 DO I 1 M DO J 1 N F F P I J END DO END DO END 5 A 3 0 B 5 0 C 4 0 运行结果 运行结果 CALL SUBT B A C 2 0 5 0 WRITE 1X 2F4 1 B A C END SUBROUTINE SUBT X Y X X 2 Y Y 1 END 三 程序填空题 每空三 程序填空题 每空 2 分 共分 共 30 分 分 下列模块中的子程序下列模块中的子程序 DECTOR 的功能是用除的功能是用除 R 取余法将整数取余法将整数 X 转换成转换成 R 2 R 9 进制的数进制的数 字 并把结果存放在数组字 并把结果存放在数组 B 中 中 B 0 存放存放 R 进制数的位数 其正负号与进制数的位数 其正负号与 X 相同 最低位放在相同 最低位放在 B 1 中 模块中的函数中 模块中的函数 ISPRIME 的功能是判断整数的功能是判断整数 X 是否为一个素数 是返回是否为一个素数 是返回 TRUE 否 否 则返回则返回 FALSE MODULE INTMAP IMPLICIT NONE CONTAINS SUBROUTINE DECTOR X R B 将整数 将整数 X 转换成转换成 R 进制的数字存放在数组进制的数字存放在数组 B 中中 INTEGER INTENT IN X R INTEGER INTENT OUT B 0 20 INTEGER S 1 I 0 REMAINDER X1 IF X zero a b b a f a df a fb f b end do newton b return end function newton A 阿 A A C F B D G E 求值的函数求值的函数 real function func x implicit none real x func x 3 2 x x 2 x 1 return end function func func x real function dfunc x implicit none real x dfunc 3 x 2 4 x 2 return end function dfunc program main implicit none real e