第四章
1.program main implicit none write(*,*) "Have a good time." write(*,*) "That's not
bad." write(*,*) '"Mary" isn''t my name.' end program
2.program main real, parameter :: PI=3 implicit none.14159 real radius write(*,*) "请输入半径长" read(*,*) radius write(*,"(' 面积='f8. 3)") radius*radius*PI end program
3.program main implicit none real grades write(*,*) "请输入成绩" read(*,*) grades
write(*,"(' 调整后成绩为 'f8.3)") SQRT(grades)*10.0 end program
4.integer a,b real ra,rb a=2 b=3 ra=2.0 rb=3.0 write(*,*) b/a ! 输出1, 因为使用整数计算, 小数部分会无条件舍去 write(*,*) rb/ra ! 输出1.5
5.program main implicit none type distance real meter, inch, cm end type
type(distance) :: d write(*,*) "请输入长度:" read(*,*) d%meter d%cm = d%meter*100
d%inch = d%cm/2.54 write(*,"(f8.3'米 ='f8.3'厘米 ='f8.3'英寸')") d%meter, d%cm, d%inch
ProProblem ProAnswer
"水仙花数"是指这样的数，其各位数字的立方和等于该数本身。编写程序，计算从100年开始到2000年为止，共有多少个年号是水仙花数年号。 * 4
"水仙花数"是指这样的数，其各位数字的立方和等于该数本身。编写程序求100至400的范围内有多少个水仙花数。 * 3
"水仙花数"是指这样的数，其各位数字的立方和等于该数本身。编写程序求100至500的范围内有多少个水仙花数。 * 4
"水仙花数"是指这样的数，其各位数字的立方和等于该数本身。编写程序求100至999的范围内有多少个水仙花数。 * 4
（x,y,z）满足方程：x^2+y^2+z^2=55^2(注：要求 x > y > z),则（x,y,z）称为方程的一个解。试求方程的整数解（包括负整数解）的个数。 * 62
[100，999]范围内同时满足以下两个条件的十进制数. ⑴其个位数字与十位数字之和除以10所得的余数是百位数字；⑵该数是素数; 求有多少个这样的数？ * 15
[300，800]范围内同时满足以下两个条件的十进制数. ⑴其个位数字与十位数字之和除以10所得的余数是百位761 ProProblem ProAnswer
数字 ；⑵该数是素数；求满足上述条件的最大的三位十进制数。 *
50元的整币兑换成5元、2元和1元币值（三种币值均有、缺少一种或两种都计算在内）的方法有多少种。 * 146
50元的整币兑换成5元、2元和1元币值（要求三种币值均有）的方法有多少种。* 106
A,B,C是三个小于或等于100正整数，当满足1/A^2+1/B^2=1/C^2关系时，称为倒勾股数。求130C的倒勾股数有多少组。 * 1
爱因斯坦走台阶:有一台阶,如果每次走两阶,最后剩一阶;如果每次走三阶,最后剩两阶;如果每次走四阶,最后剩三阶;如果每次走五阶,最后剩四阶;如果每次走六阶,最后剩五阶;如果每次走七阶,刚好走完.求满足上述条件的最小台阶数是多少？ * 119
fortran知识点总结
一、语法结构
Fortran语言的语法结构遵循一套严格的规则。下面是一些常见的语法结构：
1. 程序单元：Fortran程序由一个或多个程序单元组成。每个程序单元由一个或多个声明和执行语句组成。
2. 注释：在Fortran中，注释可以用来提高代码的可读性。注释以感叹号（!）开头，直到行末为止。
3. 标识符：Fortran中的标识符由字母、数字和下划线组成，且区分大小写。标识符用于表示变量、函数、子程序等。
4. 变量声明：在Fortran中，变量声明使用关键字“REAL”、“INTEGER”、“LOGICAL”等来指定变量的数据类型。例如，REAL :: x 表示声明了一个实数类型的变量x。
5. 程序控制结构：Fortran提供了多种控制结构，包括顺序结构、条件结构和循环结构。这些结构提供了程序的流程控制和逻辑控制。
6. 函数和子程序：Fortran支持函数和子程序的定义和调用。函数和子程序可以帮助程序员组织和重用代码。
7. 模块和接口：Fortran中的模块和接口提供了一种组织代码的方式。模块可以包含多个子程序和全局变量，接口可以用来定义子程序的接口。
二、数据类型
在Fortran中，数据类型用于表示数据的类型和大小。Fortran提供了多种数据类型，包括整数、实数、逻辑值、字符、复数等。下面是一些常见的数据类型：
1. 整数：整数类型用于表示整数值。在Fortran中，整数类型包括“INTEGER”、“LOGICAL”
和“CHARACTER”类型。
2. 实数：实数类型用于表示实数值。在Fortran中，实数类型包括“REAL”和“COMPLEX”类型。REAL类型用于表示实数，COMPLEX类型用于表示复数。
3. 字符：字符类型用于表示字符值。在Fortran中，字符类型使用CHARACTER关键字进行声明。字符类型可以表示单个字符或者字符数组。
软件技术基础(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．将数学式)||(ln215ex 改写为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语句 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
