FORTRAN90实验(7)

3. 上机调试各程序。调试程序时，要充分注意和利用编译、连接和运行时计算机给出的信息，要求能够根据这些信息，较熟练地判断出程序的语法错误和一般的逻辑错误。 4. 选择一些有代表性的数据作为输入，运行程序。 5. 详细记录数据的输入、输出，并对实验结果进行分析。 三、实验内容

1. 下面程序的功能是从键盘输入一个长度不超过20的字符串STR，统计其中大写字母A的个数N。在标注行有错，请改正。 PROGRAM EXAM IMPLICIT NONE

CHARACTER(LEN=20)::STR INTEGER::I,N

READ '(I20)',STR !<==ERROR1 N=1 !<==ERROR2 DO I=1,20

IF(STR(I,I)='A') N=N+1 !<==ERROR3 END DO

PRINT '(1X,I6.2)',N END PROGRAM EXAM ERROR1处正确的语句是： ERROR2处正确的语句是： ERROR3处正确的语句是：

2. 下面程序的功能是从第2列开始打印下面图形： A A A A A A A 请在下划线处填上适当的内容,以完成题目的要求。

PROGRAM EXAM INTEGER::I

CHARACTER(LEN=5)::LINE LINE=' ' DO I=1,4

LINE( ) ='A' PRINT *,LINE LINE=' ' END DO DO I=1,3

LINE( )='A' PRINT *,LINE

END DO

END PROGRAM EXAM

3. 程序设计

⑴ 编程打印下面图形：

******************************* **********⑵ 输入一行字符串，将其中的小写字母转换成大写字母，输出转换后的字符串。 四、实验说明

1. 对于程序设计题⑴，可以采用字符串的方法或者字符数组的方法来求解。

2. 对于程序设计题⑵，可以采用字符串的方法或者字符数组的方法来求解。注意小写字母与其对应的大写字母ASCII码的差值为32。 五、思考题

1. 输入一段字符，每个单词以空格分隔，统计单词的个数。 2. 输入一段字符，统计其中某个字母出现的概率（不区分大小

写）。

2.8 派生类型

一、实验目的

1. 理解派生类型概念，掌握派生类型的定义和使用方法。 2. 能够用正确的方法给派生类型变量、赋值、输入和输出。 3. 理解成员的概念，能够用派生类型进行学生档案、职工档案等信息处理。 二、实验要求

1. 认真复习教材第8章的内容。

2. 按照编程题目的要求设计算法，并写出程序。

3. 上机调试程序。调试程序时，要充分注意和利用编译、连接和运行时计算机给出的信息，要求能够根据这些信息，较熟练地判断出程序的语法错误和一般的逻辑错误，逐步掌握程序调试的一般方法和手段。

4. 在进行输入输出时，给出一些提示性的语句以加强程序的友好性。

5. 详细记录数据的输入、输出信息，并对结果进行分析。 三、实验内容

1. 已知有4个学生的记录，每个学生有学号、姓名、3门课成绩。下面程序功能是输出这4位学生的学号、姓名、3门课成绩和每位学生的总分。在标注行有错，请改正。

程序如下：

IMPLICIT NONE TYPE STUDENT INTEGER::XH

CHARACTER(LEN=10)::NAME REAL,DIMENSION(4)::CJ END TYPE STUDENT

DIMENSION(4)::A !<==ERROR1 INTEGER::I,J REAL::S DO I=1,4

READ *,A(I)%XH,A(I)%NAME S=0

DO J=1,4 !<==ERROR2 READ *,A(I)%CJ(J) S=S+A(I)%CJ(J) END DO

CJ=S !<==ERROR3 END DO DO I=1,4 PRINT

'(1X,I6,2X,A10,2X,4F6.1)',A(I)%XH,A(I)%NAME,(A(I)%CJ(J),J=

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库FORTRAN90实验(7)在线全文阅读。