Fortran90循环结构程序编程作业.docVIP

循环结构程序设计作业 前面已学习了顺序结构和选择结构两种程序结构，也学习了顺序结构程序设计和选择结构程序设计两种程序设计方法。这两种程序结构对于解决具有重复计算或重复处理问题不太实用，需引入第三种程序结构 循环结构 ，来解决这类问题。 FORTRAN90提供了丰富的用于实现循环结构的语句，有：DO 语句、DO WHILE语句、EXIT、CYCLE等。循环结构有“计数型”、“当型”和“直到型”三种，需要掌握三种循环结构特征以及实现循环结构的各种循环语句，还需要掌握三种循环结构之间的等价转换。 本实验是学习和掌握关系表达式、逻辑表达式、循环结构、循环结构语句、循环结构程序设计方法的一次系统实验活动。通过本次实验，能设计和编写简单的具有循环结构的程序，为学习和掌握更复杂的程序结构和程序设计方法奠定基础。 实验内容1 问题描述 给定5名学生的考试成绩，评判每个学生的成绩等级，并输出。编写程序实现之。 成绩按以下标准评定等级： 优：90≤S≤100;良：80≤S 90;中：70≤S 80; 及格：60≤S 70;不及格：S 60。 2．问题分析 已知：5个学生成绩：s1、s2、s3、s4、s5，从键盘输入，数据类型为整型。 求：5个学生成绩等级，g1、g2、g3、g4、g5，数据类型为字符型。 求解该问题的基本思想是：从键盘依次读取学生成绩数据，每读一个学生成绩，就按照成绩等级评定标准评定等级，并输出该学生等级。 由于有确定的5个学生，所以读取学生成绩和评定成绩等级共5次。该问题显然是一个重复次数确定的重复处理问题，可通过“计数型”循环结构和DO循环语句实现。 用整型变量cj表示学生成绩，用字符型变量grade表示成绩等级。用整型变量I作为循环控制变量。 通过分析，设计算法，绘制框图，如图6-2所示。 3．程序编写 根据算法和框图，设计和编写程序如下 在下划线空白处填充正确内容 ： !班级： !姓名： !时间： !判定学生成绩的等级 PROGRAM main INTEGER 1 I，cjCHARACTER*6 grade DO I WRITE *， 1X， I2， ， I READ *，cj IF cj THEN grade ELSEIF cj 60 THEN grade ‘不及格’ ELSE IF cj 70 THEN grade ELSE IF CJ 80 THEN grade ‘中’ ELSE IF CJ 90 THEN grade ‘良’ ELSE grade ENDIF PRINT*，‘该学生成绩等级为： ’，grade PRINT* END 4．实验要求 分析问题，理解算法和程序，完成程序填空，得到正确程序，亦可自行设计和实现。 掌握“计数型”循环结构和选择结构特征，以及相互嵌套关系。 掌握DO循环语句和多支块IF语句的语法规则和使用要求。 运行程序，输入数据：45、85、75、98、110，得到输出结果。 将输入数据和输出结果以注释形式编辑输入到源程序文件末尾。 5．实验步骤 分析问题，理解算法和程序，完成程序填空，亦可自行设计和编写程序。 编译、构建、运行、调试程序。 运行程序，输入数据：45、85、75、98、110，得到输出结果。 将输入输出数据以注释形式编辑输入到源程序文件末尾。 -2- -1- I I+1 grade ‘优’ grade ‘不’及’ 假 真 cj 90 假 真 cj 80 grade ‘良’ grade ‘成绩’错’ 真 输入学生成绩cj I≤5 I 1 开始 真 假 真 cj 70 假 真 cj 60 cj 100 假 输出学生等级grade 结束 图6-2 程序框图 假 grade ‘及’ grade ‘中’