发布时间 : 星期日 文章fortran模拟试题更新完毕开始阅读a993cb06a22d7375a417866fb84ae45c3b35c2b3
2．给定树如下，分别写出对该树进行中序和后序遍历的结果 (4分) 答案：
中序遍历结果是 GDBEAFC 后序遍历结果是 GDEBFCA
已知有序列A、B、C，如果按A、B、C的顺序入栈，请写出它们的各种不同的出栈序列。（2分）
答案：A,B,C A,C,B B,C,A B,A,C C, B,A 五．编程题（10分）（在下列2题中任选一题，按题目要求编写FORTRAN程序。）
编写判断一个整数是否为偶数或奇数的子例行子程序，在主程序中调用它，以便分别求出100个整数中奇数和偶数的个数。
SUBROUTINE SUB(N,CH) CHARACTER*1 CH IF(MOD(N,2)==0)THEN CH=’O’ ELSE CH=’J’ END IF END
PROGRAM MAIN DIMENSION K(100)
CHARACTER*1 CHA READ *,K NA=0 NB=0
DO I=1,100 KN=K(I)
CALL SUB(KN,CHA) IF(CHA==’O’)NA=NA+1 IF(CHA==’J’)NB=NB+1 END DO
PRINT *,’偶数的个数为:’,NA PRINT *,’奇数的个数为:’,NB END
2. 已知一个实型数组由6行5列组成，要求： （1）统计数组内每一行的所有元素和，
（2）将这些元素的和进行升序排列，并输出排序结果； （3）按数组原有格式输出已知数组。 REAL A(6,5),S(6)，T READ *,A DO I=1,6 S(I)=0 DO J=1,5
S(I)=S(I)+A(I,J)
END DO
END DO DO I=1,5
DO J=I+1,6
IF(S（J） ENDIF END DO ENDDO PRINT *,(S(I),I=1,6) WRITE(*,10)((A(I,J),J=1,5),I=1,6) 10 FORMAT(1X,6F8.1) END 软件技术基础(FORTRAN)上机考试练习题 编写程序,首先从文件D:\\CJ1.TXT读入以下字符串： \am learning the C++ Programming Language.\ 将其中的单词\换成\，然后将结果显示在屏幕上。 编写程序,首先键盘输入以下两个字符串：\，\the FORTRAN Programming Language\；分别统计各字符串中字母出现的次数，显示在屏幕上并存入顺序有格式文件D:\\ST.TXT中。要求编写统计在字符串中字母出现次数的函数或子程序。 编写程序实现以下要求: 写一个函数或子程序fun, 求出1到m(含m)中能被7或11整除的所有整数并存入文件D:\\YU711.TXT中。 主程序调用fun函数或子程序，并读入和显示文件D:\\YU711.TXT的内容。