fortran模拟试题
软件技术基础(FORTRAN)笔试模拟试题
(带答案)
一．概念选择题（单选题，将正确的答案填入括号内。每题1分，共15分）
1.已知整型变量L=5，M=13，N=4，表达式L*M/N、L/N*M和M/N*L的值分别是（A）。
A）1613 15B）16.2516.25 16.25
C）16.013.0 15.0D）161616
2．将数学式1
(ln | x | e
?5
) 改写为FORTRAN表达式，正确的是(D)。2
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）25B）30C）36D）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) 0B) 1C) 6D) 无穷
12．下列形式中，不能作为形参的是(C)。
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)运行结果是：43
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,457
A(I,J)=I*J-15811
ENDDO3711 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分）
1.下列模块中的子程序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<0 ) S=-1
X1=ABS(X)
DO WHILE(X1 /= 0)
I = I+1
REMAINDER =MOD( X1,R)
B(I) = REMAINDER
X1=X1/R
ENDDO
B(0) =I*S
END SUBROUTINE
FUNCTION ISPRIME(X)！判断整数 X 是否为一个素数
INTEGER::X,K
LOGICAL::ISPRIME
.FALSE.
DO K=2,X-1
IF(MOD(X,K) ==0)EXIT
END DO
IF(K==X)ISPRIME=.TRUE.
END FUNCTION
END MODULE
2．求出1900～2100的闰年，要求把求出的闰年存入数组Y，并统计闰年的数目。以7位宽度输出闰年年号，每行 10 个。
INTEGER::Y(50), K=0
DO I=1900,2100
IF(MOD(I,400)==0.OR.MOD(I,100)/=0.AND.MOD(I,4)==0) THEN K =K+1
Y(K) = I
ENDIF
ENDDO
PRINT '(1X,I2,12H LEAP YEARS:)',K
PRINT '(1X,10I7)',(Y(I),I=1,K)
END
3. 下面的程序输出ACSII码对照表，请填空。
INTEGER A(32:126),ASC
CHARACTER CH(32:126)
PRINT*, " ACSII 码对照表"
DO ASC=32,126
ASC
CH(ASC)=CHAR(ASC)
ENDDO
PRINT 10, (CH(I),A(I),I=32,126)
10FORMAT(7(1X,A,"=",I4))
END
五．编程题（10分）（在下列2题中任选一题，按题目要求编写FORTRAN程序。）
1.编写判断一个整数是否为偶数或奇数的子例行子程序，在主程序中调用它，以便分别
求出 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）
T=S(J) S(J)=S(I) S(I)=T ENDIF END DO ENDDO PRINT *,(S(I),I=1,6) WRITE(*,10)((A(I,J),J=1,5),I=1,6) 10FORMAT(1X,6F8.1) END 百度文库 - 让每个人平等地提升自我 软件技术基础(FORTRAN)上机考试练习题 1.编写程序,首先从文件D:\CJ1.TXT读入以下字符串："I am learning the C++ Programming Language." 将其中的单词"C++"换成"FORTRAN"，然后将结果显示在屏幕上。 2.编写程序,首先键盘输入以下两个字符串："I am a student of Tianjin University"， "I am learning the FORTRAN Programming Language"；分别统计各字符串中字母出现的次数，显示在屏幕上并存入顺序有格式文件D:\ST.TXT中。要求编写统计在字符串中字母出现次数的函数或子程序。 3.编写程序实现以下要求: (1)写一个函数或子程序 fun, 求出 1 到 m(含 m)中能被 7 或 11 整除的所 有整数并存入文件 D:\YU711.TXT中。 (2)主程序调用 fun 函数或子程序，并读入和显示文件 D:\YU711.TXT的内容。 4．编写一个程序，从键盘输入一字符个数不小于 50 的字符串。再输入任何一个长度小于5的字符串，如果前字符串含有该字符串，则在屏幕上输出该字符串在其中末次出现的开始位置；否则输出“NO !”。 《高级语言程序设计(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_____。 A)T.ce.1.7.AND.w.le.62.5 B)T.le.1.7.OR.w.ge.62.5 C)T.gt.1.7. AND.w.lt.62.5D)T.gt.1.7.OR.w.lt.62.5 10．FORTRAN 90规定，变量类型声明的优先顺序是 C 。 A.隐含约定（I-N规则）、IMPLICIT声明、类型声明 B.类型声明、隐含约定（I-N规则）、IMPLICIT声明 C.类型声明、IMPLICIT声明、隐含约定（I-N规则） D.IMPLICIT声明、类型声明、隐含约定（I-N规则） 11、假设CH是一个字符型变量，并且具有足够的长度，则对于CH(3:7),下面说法正确的是___D________。 A.它是一个数组片段 B.它是一个数组定义形式 C.它是CH的一个子串，并且长度是4 D.它是CH的一个子串，并且长度是5 12．数组声明语句为： INTEGER,DIMENSION(-5:-1,-3:3,11:15) ::A 数组共有 A 个元素。 A．175 B．150 C．120 D．17 13. 下列DATA语句中正确的是______C____。 A) DATA /A,B/-1.0, -1.0/ B) DATA A, B/2*(-1.0)/ C) DATA A, B/2*-1.0/ D) DATA A/-1.0, B/-1.0 14. 下列有关FORTRAN数组的说法正确的是______D_____。 A) 数组定义语句只能定义一维或二维数组 B) 数组元素下标不能出现负值 C) 在赋值语句中出现的A(3)肯定是数组元素 D) 程序中使用的数组必须进行说明 学号 《金融IT入门-程序设计》 课程设计报告 中国地质大学长城学院XX 系 2017年月 3 日 目录 一．总体概述： 二．设计目标： 三．程序流程图： 四．程序代码： 评分细则 评分项优秀良好中等差 上课出勤 上课表现 上机情况 平时作业完成情况 期末大作业： （1）书写认真程度 题目：用Python编写简易计算器程序 学号： 专业： 班级： 姓名： 指导教师： 2016-2017学年第二学期 （2）内容详实程度（3）文字表达能力（4）是否体现观点 简短教师签名： 年月日 评 分 等 级 备 注 评分等级有五种：优秀、良好、中等、及格、不及格 一、设计内容 ------------------------------------------------------------------------------------------------- - 1 - 1. 课程设计目的：-------------------------------------------------------------------------------------- - 1 - 2.课程设计任务： --------------------------------------------------------------------------------- - 1 - 3.创新要求：---------------------------------------------------------------------------------------------- - 2 - 4.设计要求: ------------------------------------------------------------------------------------------------ - 2 - 二、原理和分析 ---------------------------------------------------------------------------------------------- - 2 - 1.开发的技术及功能 ----------------------------------------------------------------------------------- - 2 - 2.设计思路------------------------------------------------------------------------------------------------ - 2 - 3.设计效果图--------------------------------------------------------------------------------------------- - 2 - 三、设计过程 ------------------------------------------------------------------------------------------------- - 3 - 1. 程序思路： -------------------------------------------------------------------------------------------- - 3 - 2.功能实现：---------------------------------------------------------------------------------------------- - 4 - 1)加减乘除求余以及指数运算----------------------------------------------------------------- - 4 - 2)其他运算 ------------------------------------------------------------------------------------------ - 4 - 3)主要方法说明------------------------------------------------------------------------------------ - 5 - 4)程序流程图 --------------------------------------------------------------------------------------- - 5 - 3.算法思路：---------------------------------------------------------------------------------------------- - 6 - 4.数据分析：---------------------------------------------------------------------------------------------- - 7 - 四、设计结果和分析------------------------------------------------------------------------------------------ - 7 - ⒈运行调试------------------------------------------------------------------------------------------------ - 7 - 1)进行加减乘除求余以及指数运算----------------------------------------------------------- - 7 - 2)求倒 ------------------------------------------------------------------------------------------------ - 9 - 3)退格 ------------------------------------------------------------------------------------------------ - 9 - 4)清零 ---------------------------------------------------------------------------------------------- - 10 - 5)求余弦、求正切、对e求幂、求平方根、求自然对数、求倒运算 ------------- - 11 - 6)连续运算（例：2*3*4=24.0）------------------------------------------------------------- - 11 - 7)异常处理（例：求倒时输入数为0） --------------------------------------------------- - 11 - 五、设计体会和小结 -------------------------------------------------------------------------------------- - 12 - 六、参考文献 ----------------------------------------------------------------------------------------------- - 13 - 七、源程序--------------------------------------------------------------------------------------------------- - 13 - 一、设计内容 1.课程设计目的： 1）掌握Java语言的程序设计方法； 2）理论联系实际，进一步提高学生的软件开发技术； 3）培养学生分析、解决问题的能力； 4）提高学生实践论文撰写能力。 2.课程设计任务： 一些免费的fortran编译器 https://www.wendangku.net/doc/c510035746.html,/node/8 Free Fortran Compilers 取自https://www.wendangku.net/doc/c510035746.html,/compilers/fortran.shtml This page lists free Fortran compilers for various operating systems. Some of the compilers are compliant with the ANSI Fortran 77 specifications, others with Fortran 95, and so on. Some of them may also come complete with debuggers, editors and an integrated development environment (IDE). If you need a book on Fortran, you may want to check out the selection of books available at https://www.wendangku.net/doc/c510035746.html,. Disclaimer The information provided on this page comes without any warranty whatsoever. Use it at your own risk. Just because a program, book or service is listed here or has a good review does not mean that I endorse or approve of the program or of any of its contents. All the other standard disclaimers also apply. Free Fortran Compilers and IDEs Sun Studio Compilers and Tools Sun Studio Compilers and Tools for Linux and Solaris OS on Sparc and x86/x64 platforms includes command line tools as well as a NetBeans-based IDE for developing, compiling and debugging C, C++ and Fortran programs. It also includes performance analysis tools. Intel Fortran Compiler for Linux FORTRAN程序设计复习题 选择题 B (1)下列各FORTRAN表达式中合法的是 A) S+T*2P >= 0.0 B) .NOT. (A*B+C) C) A2+B2/(C+D) <= 0.0 D) (A+B).NOT．A*B．GT．0.0(.NOT.只跟一个表达式) C (2)数学式(3/5)ex+y的FORTRAN表达式是 A) 3*EXP(X+Y)/5 B) 3*E* *(X+Y)/5.0 C) (3/5)*EXP(X+Y) D) (3.0/5.0)EXP(X+Y) D (3)下列FORTRAN77表达式中不合法的是 A) A．GT．B．EQV．C．GT．D B) A．AND．B．AND．C．AND．D C) .NOT．(X．LE．0.0) D) A．LT．B．LT．C．LT．D D (4)下列叙述中不正确的是 A) FORTRAN子程序可以单独编译 B) 对一个FORTRAN源程序进行编译和连接无误后可生成可执行文件 C) 即使编译和连接都正确无误，FORTRAN程序运行时仍可能出错 D) FORTRAN连接的主要任务是把函数库中的函数翻译成机器指令(主要任务为连接目标文件) B (5)在下列FORTRAN77运算符中，优先级最高的是 A) .AND. B) .NOT. C) .OR. D) .EQ. B (6)FORTRAN表达式"6/5+9/2**3/2"的值为 A) 33 B) 1 C) 5 D) 3 A (7)下列FORTRAN77 表达式中，合法的是：A）相当于0.0.LE.X .AND.（.NOT.（X.GE.10.0 ））A) 0.0.LE.X .AND..NOT.X.GE.10.0 B) 0.0.GE.X.LT.10.0 C) 0.0.LE.X.GE.10. D) 10.0.LE.X.OR..AND.X.GT.0.0 D (8)关于编译一个FORTRAN源程序文件，下列说法中错误的是 A) 允许编译只有一个主程序而没有子程序的源文件 B) 允许编译有多个子程序的源文件 C) 允许编译只有一个子程序而没有主程序的源文件 D) 允许编译有多个主程序的源文件 C (9)在FORTRAN77源程序中，续行标志符必须放在 A) 第1列 B) 第1-6列 C) 第6列 D) 第5列 D (10)下列关于"SUBROUTIN E MAP(X，Y)"语句行的叙述中，不正确的是 A) 这是子程序的第一个语句 B) 字符串"MAP"是子程序名 C) 变量X是子程序的形参 D) 子程序执行后，MAP将返回整型数据（子程序无返回值，自定义函数才有） A (11)FORTRAN表达式"2/4+0.5"的值是 A) 0.5 B) 1 C) 1.0 D) 0 D (12)FORTRAN表达式"MOD(4.9，1.3)"的值是 A)1.3 B)0.0 C)4.9 D)1.0 A (13下列FORTRAN运算符中，优先级最低的是 A）逻辑运算符.AND. B）算术运算符* C)关系运算符 >= D)算术运算符＋ A (14下列语句函数的定义中正确的是 A）F(X，Y)＝(X＋Y)/(X*Y)＋7.0 B）FUNCTION FUN(I，J，K)＝3*I＋2*J＋0.5*K 计算器 项目内容：编写一个Applet，模仿windows附件所带计算器的功能，可以帮助用户完成计算功能，具体如下图所示。 项目要求：使用图形的方式借助窗口、菜单、按钮等标准界面元素和鼠标操作，来帮助用户方便地向计算机系统发出命令，启动操作，并将系统运行的结果同样以图形的方式显示给用户，这样更加直观和生动； 1.Applet容器中组件的添加与设置，包括面板以及菜单的使用； 2.容器中组件的布局管理； 3.Java核心包中数组、数学计算类的使用； 4.异常的处理； 5.事件处理模型中的三类对象的使用： 1.Event-事件，用户对界面操作在java语言上的描述，以类的形式出现，例如键盘操作对应的事件类是KeyEvent。 2.Event Source-事件源，事件发生的场所，通常就是各个组件，例如按钮Button。 3.Event handler-事件处理者，接收事件对象并对其进行处理的对象。 6.程序中事件处理的流程： 1.计算流程的细化 参考代码： import .*; import .*; import .*; import import import public class Calculator implements ActionListener { #############"); dd(panel); panel1 = new JPanel(); panel2 = new JPanel(); (new BorderLayout()); 键入计算的第一个数字。\n"); ("2. 单击“+”执行加、“-”执行减、“*”执行乘或“/”执行除。\n"); ("3. 键入计算的下一个数字。\n"); ("4. 输入所有剩余的运算符和数字。\n"); ("5. 单击“=”。\n"); aboutCal = new JMenuItem(" 关于计算器(A)"); (this); *************************错误与警告信息汇总************************* －－－－－－－－－－－－－－简称《错误汇总》 %%%%%%%%%%%%%%% @@@ 布局 @@@ &&&&&&&&&&&&&&&&&&&&&& AB系列：常见错误信息 C系列：常见警告信息 D系列：cdstudio斑竹总结的fortran二次开发的错误表 E系列：网格扭曲%%%%%%%%%%%%%%%%% @@@@@@ &&&&&&&&&&&&&&&&&&&&&&&&& 模型不能算或不收敛，都需要去monitor，msg文件查看原因，如何分析这些信息呢？这个需要具体问题具体分析，但是也存在一些共性。这里只是尝试做一个一般性的大概的总结。 如果你看见此贴就认为你的warning以为迎刃而解了，那恐怕令你失望了。不收敛的问题千奇万状，往往需要头疼医脚。接触、单元类型、边界条件、网格质量以及它们的组合能产生许多千奇百怪的警告信息。企图凭一个警告信息就知道问题所在，那就只有神仙有这个本事了。一个warning出现十次能有一回参考这个汇总而得到解决了，我们就颇为欣慰了。 我已霸占2楼3楼4楼，以便分类并续加整理。 斑竹可随意编辑或者添加你们觉得合适的条目和链接，其他版友有warning方面的疑问请回复到这个帖子，大家集思广益，斑竹们也可以集中讨论并定期汇总到1-4楼。 类似于： Fixed time is too large Too many attamps have been made THE SOLUTION APPEARS TO BE DIVERGING. CONVERGENCE ISJUDGED UNLIKELY. Time increment required is less than the minimum specified 这样的信息几乎是无用信息（除了告诉你的模型分析失败以外，没有告诉你任何有用的东西）。宜再查找别的信息来考察。根据经验，改小增量步也不一定能收敛，虽然也有人报告过改好的先例，我是从来没有遇到过，也从来没有那个奢望。所以我一般从模型的设置入手。原则上本贴只欢迎以下回帖： 1）你出现了已经解决的错误信息or解决不了的错误信息，可以回帖附上信息，并对模型和症状加以描述（斑竹会酌情加分）； 2）你发现某个帖子有已经解决的错误信息or解决不了的错误信息， 可以提供链接（斑竹会加分）； 3）你发现某一条错误信息可能还存在别的情况or别的应对方案， 可以回帖说明（斑竹会加分） 必须说明的是：Error和warning的性质是完全不同的。Error意味着运算失败，but出现warning可能还能算，而且有些运算必定会出现warning（比如接触分析必定出“负特征值”，下有详述）。很多警告只是通知性质的，或者只是说明一下而已，不一定都是模型有问题。比如以下warning完全可以忽略： xxxxx will （not）printed，这种只是通知你一声，某些玩意儿不输出了。还有： The parameter frequency cannot be used with the parameter field. It will be ignored（都说某某被ignored了）. 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 ) A．类型说明语句、IMPLICIT 说明语句、隐含约定 B．隐含约定、IMPLICIT 说明语句、类型说明语句 C．IMPLICIT 说明语句、类型说明语句、隐含约定 D．隐含约定、类型说明语句、IMPLICIT 说明语句 10．“两整数M与N不能同时小于零”的FORTRAN表达式( D ) A．M＞＝0．AND．Ｎ＞＝０ B．(M．GE．0．AND．N．LT．0)．OR．(M．LT．0．AND．N．GE．0）C．(M．LE．0．AND．N．LE．0)．OR．(M．LE．0．AND．N．GE．0）D．M．GE．0．OR．N．GE．0 1.2计算器的介绍 (1)在运行程序后，系统会弹出一个基于对话框的计算器界面，如下图所示： 图1.1 计算器界面 (2)在计算器程序中，主要通过一个编辑框来获取表达式和显示计算结果，表达式可以通过键盘和单击按钮2种方式输入，输入后的结果如下图所示： 图1.2 输入表达式后的界面 (3)在输入完表达式后，单击“=”后，开始对表达式进行计算，计算完成后，在编辑框中显示计算的结果。 图1.3 计算后的结果 (4)计算器可以实现十进制转化为十六进制或二进制，其实现的操作为先输入一个十进制整数，再单击按钮“转化为二进制”或“转化为十六进制。 图1.4 输入一个十进制数100 图1.5 100转化为二进制后的结果 图1.6 100转化为十六进制后的结果 (4)另外，计算器还可以实现一些简单的函数运算，实现的操作和十六进制/二进制转化类似，是先输入一个数字，在单击想要进行的函数的按钮，单击后就会在编辑框中显示运算的结果。 1算法的实现 2.1把字符串转化为数字和运算符的算法 (1)如果字符串中只有数字。这个情况用来实现一些简单函数的运算。在进行简单函数的运算时，都是先输入一个数字，再单击要进行运算的按钮，然后编辑框显示运算的结果。程序用了一个函数double GetaStr(CString str)来实现这个功能，该函数以编辑框变量m_strResult为实参，再得到m_strResult的值后，调用GetAt函数，一个字符一个字符的读取，如果碰到整数，执行“itemp=itemp*rate+(str.GetAt(i)-'0');”，其中变量itemp初始值为0， 楼主为了减少重复回答问题，特编此帖，并不定期添加和更新内容。 错误难免，欢迎讨论，仅供参考。 很多人问哪里可以找到Fortran编译器，有不少热心学友提供网址，特汇集在这里。虽然俺检验过这些链接，但是它们不一定总有效。 Fortran编译器下载： CVF？ FTN95(License:Freeforpersonaluse) 以下操作，如无特别说明，都是以为例。 1.如何加大Stacksize？ 选Project=>Settings=>Link=>Category:Output=>？ Stackallocations Reserve:这里填新值（默认为1M，若需要10M，则填） 2.如何用Fortran批量生成文件？ 设要生成4000个文件，文件名为AA1-AA4000，如何写循环生成文件,而不用写4000次write 命令呢？ 用内部文件： character(len=80)::filename,form integer::i doi=1,4000 selectcase(i) case(1:9) write(form,'(i1)')i case(10:99) write(form,'(i2)')i case(100:999) write(form,'(i3)')i case(1000:9999) write(form,'(i4)')i endselect write(filename,*)"AA",trim(form),".TXT" open(10,file=filename) write(10,*)i close(10) enddo？ stop end 3.如何用Fortran动态生成输出格式？ 设有一个数组data(100)，输出时，希望每行输出num个数，而num由用户输入，如何实现？ 用内部文件： character(len=80)::form real::data(100) integer::i,num data=(/(i,i=1,100)/)/ read(*,*)num write(form,*)"(",num,"" write(*,form)data stop end 4.MS是不是很垃圾？ 是垃圾，其中Bug太多，多到不可用的地步！ 在这个主题里，换了CVF后问题就没了的人已有相当的数目。 如果你用，遇到莫名其妙的错误，建议换，这是一个比较成熟的编译器。 5.如何用F90/95生成随机数？ 注意： 现在计算机产生的随机数都是伪随机数。 random_number(x)产生一个0到1之间的随机数（x可以是向量），但是每次总是那几个数。用了random_seed()后，系统根据日期和时间随机地提供种子，使得随机数更随机了。 programrandom implicitnone real::x callrandom_seed()!系统根据日期和时间随机地提供种子 callrandom_number(x)!每次的随机数就都不一样了 write(*,*)x stop endprogramrandom 6.函数/子程序超载的例子 贵州大学2006-2007学年第一学期考试试卷 B 高级语言程序设计 注意事项： 1. 请考生按要求在试卷装订线内填写姓名、学号和年级专业。 2. 请仔细阅读各种题目的回答要求，在规定的位置填写答案。 3. 不要在试卷上乱写乱画，不要在装订线内填写无关的内容。 4. 满分100分，考试时间为120分钟。 一、选择题（共50分,每小题2分，各题中A）、B）、C）、D） 四个选项中，只有一个选项是正确的，请将正确的编号填在括号内） 1. 使用超大规模集成电路制造的计算机应该归属于（） A) 第一代B) 第二代C) 第三代D) 第四代 2. 下列FORTRAN77运算符中，优先级最低的是（）A）逻辑运算符.AND. B）算术运算符* C）关系运算符.GE. D）算术运算符＋ 3．下列标识符中，不属于FORTRAN77常量的是（）A）.TRUE. B）FALSE C）ˊROOT＝ˊ D）ˊ123.0ˊ 4.下列叙述中错误的是（）A）PROGRAM语句可以是FORTRAN77主程序的第一个语句 B）每一个FORTRAN77程序块的最后一个语句必须是END语句 C）FORTRAN77的所有语句都是可执行语句 D）FORTRAN77的任何可执行语句都可以有标号 5.下列FORTRAN77表达式中，值为.FALSE.的是（）A）.NOT.(.FALSE. .AND. .NOT. .TRUE.) B）.NOT. .FALSE. .OR. .NOT. .TRUE. C）.NOT. .TRUE. .AND. .NOT. .FALSE. D）X .GT. Y .OR. X .LE. Y 6. 在计算机内部，一切信息存取、处理和传送的形式是（） A) ASCII码B) BCD码C) 二进制D) 十六进制 ADINA常见问题解答 一般问题 Q：怎样改进ADINA-AUI 中实体的显示效果？ A：在某些情况下，ADINA-AUI 显示的实体在边界上不光滑，这仅仅是显示的问题，并不影响几何尺寸的精确度。为了改进显示的效果， 1 点击Modify Mesh Plot 。 2 点击Line Depiction 。 3 将ADINA-M Chord Angle 由默认的0.4改为0.1 并且点击OK。 4 点击Surface Depiction 。 5将ADINA-M Chord Angle 由默认的0.4改为0.1 并且点击OK。 6 点击OK，关闭Modify Mesh Plot 对话框。 Q：为什么AUI 的图形功能在我的计算机上不能正常的工作？ A：有些计算机的显卡在Open GL 图形系统中不能正常的工作。请切换到Windows GDI 图形系统，在Edit 菜单中，点击Graphics System ，然后选择Windows GDI 图形系统。 Q：当我从ADINA-AUI 打印文件时，为什么打印不出来任何结果？ A：注意只有Windows 版本才会发生这样的问题。 当使用Open GL 图形方式时，有的打印机会出现上述问题。为解决该问题，当打印的时候，选择Windows GDI 图形方式。从菜单Edit > Graphics System…中选择Windows GDI 作为图形系统，然后开始打印。注意打印结束后，可以将图形系统切换回Open GL 以便获得更快的图形效果。 Q：为什么安装了浮动License(Floating Industry或者Floating Educational)后，Adina无法启动？ A：如果安装过程正确，而且电脑上的防火墙不阻止Adina读取服务器上的License，那么这样的问题一般是由于计算机使用了中文名。不论是Adina的服务器还是Adina客户端，都不允许使用中文计算机名。 Q：如何将壳单元厚度显示出来？ A：在Display-->Geometry/Mesh Plot-->Modify打开的窗口中点击Element Depiction，在新打开的窗口中的Shell Element Attributes域中选择Top/Bottom（默认是Mid-Surface）。 有关界面启动 Q：怎样在Windows 版本中以批处理的方式运行ADINA？ A：在Windows 版本中，ADINA 常常是在交互方式下运行。然而，有时为了连续进行几项作业，则必须在批处理方式下运行。 以批处理方式运行ADINA－AUI 的命令为： ...\aui.exe -b -m 制作简单计算器 要求和目的 ●要求： 设计一个的计算器，具有简单的运算功能，能进行两个操作数的“+”、“-”、“*”、“/” 运算。计算器的运行效果如图 ●目的： 掌握Label控件的使用方法； 掌握ComboBox控件的使用方法； 掌握Button控件的使用方法； 掌握TextBox控件的使用方法。 ●设计步骤 新建一个Visual C# Windows应用程序，依次在界面上拖入五个“Label控件”，分别用于“计算器”、“操作数1”、“操作数2”、“运算符”和“结果”，并设置合适的字体及位置。 拖入三个“TextBox控件”，分别用于“接收操作数”和“显示结果”，其中，显示结果的“TextBox控件”的“ReadOnly属性”设置为“True”，即该文本框为只读。最后拖入一个“Button控件”，用于“计算”功能。计算器界面设计好之后，如图所示。 相关背景知识： ComboBox 控件 ComboBox 控件又称组合框，在工具箱中的图标为。默认情况下，组合框分两个部分显示：顶部是一个允许输入文本的文本框，下面的列表框则显示列表项。可以认为ComboBox就是文本框与列表框的组合，与文本框和列表框的功能基本一致。dropdownstyle属性 ●Simple 始终显示列表 ●Dropdown 文本部分可编辑 ●Dropdownlist 文本部分不可编辑 Items 属性 若要在combobox控件中添加或删除项，可以在设计器中使用Items属性向列表添加项。 SelectedIndex 属性 编辑框所选列表条目的索引号，列表条目索引号从0开始，如果编辑框未从列表中选择条目，该值为-1 SelectedItem 属性 所选择条目的内容，即下拉列表中选中的字符串，如一个也没选，该值为空。获取或设置选定项。它返回项本身，通常是一个字符串值。 编写代码 1．要求和目的 要求： 编写一段代码，用于实现计算器的功能。在“操作数”填写上两个数字，并选择“运算符”，单击“计算”按钮之后，可以在“结果文本框”中显示计算结果。 目的： 掌握数据类型转换的方法； 掌握条件判断语句的编写方法； 掌握文本框控件属性的设置方法。 ●2．设计步骤 （1）双击“计算（Button）”按钮，进入该按钮的单击事件，编写代码。 FAQ之常见错误 2014-02-02 13:45:35 来源：Fcode研讨团队评论：2点击：4419 本文从编译错误，链接错误，运行时错误，计算结果错误等四个方面介绍了常见的错误及解决思路。适合初学者阅读。 首先应该明确：错误有哪几种？我们当前遇到的是何种错误？ 阐述这些问题前，我们先讨论一下常规的应用程序开发的过程： 1>>编写代码，使用一个或多个源代码文件。 2>>对第一步的每一个源代码文件执行编译操作。得到一个或若干个目标代码。 3>>将目标代码，运行时库（Run-time Library）和其他使用到的函数库链接起来。得到一个可执行文件（EXE 或其他） 4>>编写程序的说明书，必要的（输入）数据文件 5>>将上述得到的结果发布给用户。（发布的方式可以是刻录成光盘，销售，放在网站上供别人下载，或者其他） 6>>用户得到程序后，运行，输入数据，得到计算结果。 对于很多 Fortran 程序员来说，可能用户就是自己，也可能仅仅是自己教研室的同事同学。所以第4，5，6步骤很多时候不明显。而如果使用集成开发环境（IDE）进行开发，第1，2，3步骤又可以一键完成。因此，很多初学者就认为，写程序就是：输入代码，运行，得到结果。这样的理解太狭义。 不管我们面对什么使用者来写代码，程序开发应该是上述的过程。我们的编译器，编译环境，也是为这个过程而设计的。 于是，我们将错误分为四种： 一. 编译错误（发生在第2步） 编译错误，一般是源代码书写格式不正确，不符合语法要求。 二. 链接错误（发生在第3步） 链接错误，一般是源代码结构不完整，运行时库或函数库使用不合理。 三. 运行时错误（发生在第6步） 运行时错误，一般是执行代码时，遇到了事先未料及的错误。比如内存不足了，磁盘空间不够了，输入文件格式不对了，输出文件写入失败了等等。 四. 计算结果不符合预期（程序代码不规范，或不符合你的设想） 计算结果不符合预期，可能性就很多了。语法与你的想法不一致，超出函数库的适用范围，执行流程控制不当等等。 这四种错误，其排查难度依次增大。也就是，编译错误最容易排查和修改，而计算结果不正确，最让人头疼。 j a v a编写的简单的计 算器程序 -CAL-FENGHAI-(2020YEAR-YICAI)_JINGBIAN 计算器 项目内容：编写一个Applet，模仿windows附件所带计算器的功能，可以帮助用户完成计算功能，具体如下图所示。 项目要求：使用图形的方式借助窗口、菜单、按钮等标准界面元素和鼠标操作，来帮助用户方便地向计算机系统发出命令，启动操作，并将系统运行的结果同样以图形的方式显示给用户，这样更加直观和生动； 1.Applet容器中组件的添加与设置，包括面板以及菜单的使用； 2.容器中组件的布局管理； 3.Java核心包中数组、数学计算类的使用； 4.异常的处理； 5.事件处理模型中的三类对象的使用： 1.Event-事件，用户对界面操作在java语言上的描述，以类的形式出现，例如键盘操作对应的事件类是KeyEvent。 2.Event Source-事件源，事件发生的场所，通常就是各个组件，例如按钮Button。 3.Event handler-事件处理者，接收事件对象并对其进行处理的对象。 6.程序中事件处理的流程： 1.计算流程的细化 参考代码： import .*; import .*; import .*; import import import public class Calculator implements ActionListener { #############"); dd(panel); panel1 = new JPanel(); panel2 = new JPanel(); (new BorderLayout()); 键入计算的第一个数字。\n"); ("2. 单击“+”执行加、“-”执行减、“*”执行乘或“/”执行除。\n"); ("3. 键入计算的下一个数字。\n"); ("4. 输入所有剩余的运算符和数字。\n"); ("5. 单击“=”。\n"); aboutCal = new JMenuItem(" 关于计算器(A)"); (this);大学FORTRAN考试试题样题
编写一个计算器程序课程设计报告-范例
一些 免费的fortran编译器
Fortran复习题讲解
java编写的简单的计算器程序
ABAQUS常见错误与警告信息汇总
大学FORTRAN考试试题1
用C++编写计算器程序
fortran常见问题解决
FORTRAN77试题B
ADINA常见问题解答
计算器程序
fortran常见错误
java编写的简单的计算器程序
- java编写的仿win7简单计算器小程序
- 编写一个计算器程序课程设计报告_范例
- 用C++编写计算器程序
- 设计一个简单计算器
- VB编写简单计算器程序
- 编写一个计算器程序课程设计报告-范例
- 编写一个简易计算器的源代码
- 用MATLAB实现计算器程序源代码
- java编写的简单的计算器程序
- 计算器程序java
- 编写一个计算器程序课程设计报告范例
- 编译原理实现一个简单的计算器程序
- java编写的简单的计算器程序
- java编写的简单的计算器程序文件
- 编写一个计算器程序课程设计报告范例
- 用java编写一个简易的计算器代码
- 用JAVA编写计算器程序(模拟Windows计算器)
- 设计一个简单计算器的C语言课程设计报告
- 计算器程序
- 用JAVA编写的计算器程序的设计报告