Fortran语言课程设计
《Fortran编程》课程教学大纲
本科生课程大纲课程属性：公共基础/通识教育/学科基础/专业知识/工作技能，课程性质：必修、选修一、课程介绍1.课程描述：本课程针对港口、航道与海岸工程专业二年级本科生设置。
本课程的任务是结合一般数值与非数值计算向学生介绍计算机程序设计的基本知识，使学生掌握FORTRAN 90的基本内容及程序设计的基本方法与编程技巧。
本课程包括FORTRAN的数据类型，顺序结构程序设计，选择结构程序设计，循环结构程序设计，数据的输入输出格式，数组，子程序和文件的读写等。
通过本课程的学习，要求学生初步掌握程序设计的基本方法和技巧，培养学生应用计算机解决和处理实际问题的思维方法与基本能力。
2.设计思路：本课程结合理论教授和上机练习，使同学们将Fortran编程程序设计理论知识及时应用到实际问题中，让同学们掌握应用FORTRAN 90解决和处理实际问题的思维方法与基本能力。
课程内容包括两个模块：FORTRAN 90理论教学、FORTRAN90上机练习。
（1）FORTRAN 90理论教学：理论知识以讲授为主，辅助以电子教案和多媒体课件，重点强调基础知识的学习、训练和掌握。
明确FORTRAN 90的内容范围，包括FORTRAN的数据类型，顺序结构程序设计，选择结构程序设计，循环结构程序设计，数据的输入输出格式，数组，子程序和文件的读写等相关内容。
- 1 -（2）FORTRAN90上机练习：根据实际问题设计程序进行上机练习，包括分析问题，建立模型，设计算法，确定功能，编写程序，调试程序，分析结果和整理资料等相关内容。
3. 课程与其他课程的关系：先修课程：大学计算机基础二、课程目标通过本课程的学习，要求学生达到以下目标：（1）、知识获取（Ⅰ）、理解Fortran基础概念、数组、数据类型、算法及流程图；（Ⅱ）、掌握顺序结构、选择结构和循环结构程序设计方法；（Ⅲ）、掌握子程序的编写方法；（Ⅳ）、掌握数据的输入输出程序设计和文件的读写方法。
fortran课程设计
fortran课程设计一、课程目标知识目标：1. 掌握Fortran编程语言的基本语法和结构；2. 理解Fortran程序的基本运行流程和控制逻辑；3. 学会使用Fortran进行简单的数值计算和数据处理。
技能目标：1. 能够独立编写简单的Fortran程序，并进行调试和优化；2. 能够运用Fortran语言解决实际问题，如求解线性方程组、计算函数值等；3. 能够阅读和分析Fortran程序，理解程序的设计思路和算法。
情感态度价值观目标：1. 培养学生对编程的兴趣，激发学习主动性和积极性；2. 培养学生严谨、细致的编程习惯，注重代码质量和效率；3. 增强学生的团队合作意识，学会与他人合作解决问题。
课程性质：本课程为计算机编程入门课程，以实践为主，理论联系实际，注重培养学生的动手能力和编程思维。
学生特点：学生为初中生，具备一定的数学基础和逻辑思维能力，对计算机编程有一定的好奇心。
教学要求：结合学生特点和课程性质，采用案例教学、任务驱动等方法，引导学生主动探索，注重实践操作和课堂互动。
在教学过程中，将课程目标分解为具体的学习成果，以便进行教学设计和评估。
二、教学内容1. Fortran基础知识- 程序结构及基本语法- 数据类型与变量定义- 运算符与表达式- 控制结构（顺序、选择、循环）2. 简单数值计算与数据处理- 数组的使用- 函数与子程序- 简单的输入输出操作- 常用数学函数与模块3. 程序设计方法- 任务分析与问题求解- 算法设计- 编码实现与调试- 代码优化与效率分析4. 实践项目与案例分析- 线性方程组求解- 函数绘图- 数据排序与查找- 综合案例分析与实现教学内容根据课程目标制定，涵盖Fortran编程基础、数值计算与数据处理、程序设计方法等方面。
教学大纲明确教学内容安排和进度，结合教材章节进行组织。
在教学过程中，将依据学生的掌握程度，适时调整教学进度，确保内容的科学性和系统性。
教学内容与实践项目相结合，提高学生的实际操作能力和问题解决能力。
fortran教学大纲
《FORTRAN程序设计基础》教学大纲课程名称：FORTRAN程序设计课程编号：09710051本大纲主笔人：蔡旭晖一、课程地位、性质及任务本课程属非计算机专业计算机技术基础层次的软件部分课程，是非计算机专业第二教学层次的重要组成部分，属该层次的必修课。
本课程的任务是使学生掌握一门程序设计语言，学习程序设计的基本方法。
二、课程基本要求1．学习运用程序设计语言进行程序设计的思想和方法；2．掌握FORTRAN语言的基本语法规则、数据类型及FORTRAN程序的基本结构；3．熟悉一些常用基本算法和FORTRAN语言程序设计方法，学会利用FORTRAN语言编写适合自己实际需要的程序。
三、本课程与其它相关课程的联系与分工本课程以“计算机文化基础”课程为基础，与“计算机硬件基础”共同构成“计算机技术基础”层次的课程体系，本课程负责“计算机技术基础”层次的软件基础部分。
四、课程内容、重点及深广度1．FORTRAN程序设计基础：程序设计的基本概念、FORTRAN语言的发展、FORTRAN 程序的基本结构与书写格式、FORTRAN 90开发环境。
2．顺序结构程序设计：常量与变量、内部函数、算术表达式、赋值语句、简单输入输出语句、程序执行控制语句。
3．选择结构程序设计：关系运算和逻辑运算、块IF结构、块CASE结构、逻辑IF语句、算术IF语句。
4．循环结构程序设计：DO语句、DO WHILE语句、循环的嵌套、常用算法。
5．FORTRAN 90数据类型：整型、实型、复型、字符型、逻辑型。
6．格式输入输出：常用格式描述符、格式输入输出语句。
7．数组的概念、说明与引用，数组元素的存储结构、数组的输入输出、数组的应用。
8．语句函数、函数子程序、子例行程序、模块的说明与引用，程序单元之间的数据传递方法。
9．派生类数据类型、结构体的定义、引用和初始化。
10．指针的定义与使用、链表的基本操作。
11．文件的概念、文件的打开与关闭、文件的读写及其它文件操作。
FORTRAN课程设计zwd-精选文档
F O R T R A N课程设计z w d-精选文档(共14页)--本页仅作为文档封面，使用时请直接删除即可----内页可以根据需求调整合适字体及大小--一、求一元方程的根1、采用函数子程序定义一元方程；2、程序选择以下三种方法求该方程的根；METHOD = 1 牛顿迭代法METHOD = 2 二分法METHOD = 3 弦截法3、对于不同的近似算法分别编写子程序，精度要求10-6。
一.用二分法、弦解法和牛顿迭代法求x2-6x-7=0的根。
1、二分法的基本思路：（1）现任取两个值x1和x2，使得f（x1）* f（x2）<0，也就是f（x1）和f（x2）必须异号。
这才能保证在［x1，x2］区间有解，即存在一个x使得f（x）=0。
（2）令x=（x1+x2）/2，如果f（x）=0，就找到了这个解，计算完成。
由于f（x）是一个实型数据，所以在判断f（x）是否等于0时，是通过判断｜f（x）｜是否小于一个很小的数ε，如果是就认为f（x）=0。
（3）若f（x）不等于0，判断如果f（x1）和f（x）异号，就说明解在［x1，x］区间，就以x1，x为新的取值重复步骤（2），这时用x代替否则x2，否则反之，直到找到满足条件的解为止。
程序编写如下：real x1,x2,xreal bisect,funcdoprint*,"输入x1,x2的值"read*,x1,x2if(func(x1)*func(x2)<exitprint*,"不正确的输入"enddox=bisect(x1,x2)print 10,"x=",x10 format(a,endreal function bisect(x1,x2)real x1,x2,x,f1,f2,fxx=(x1+x2)/fx=func(x)do while(abs(fx)>1e-6)f1=func(x1)if(f1*fx<0)thenx2=xelsex1=xendifx=(x1+x2)/fx=func(x)enddobisect=xendfunction func(x)real xfunc=x**2-6*x-7end二分法运行结果2、弦解法的基本思路：（1）现任取两个值x1和x2，使得f（x1）* f（x2）<0。
fortran95课程设计
fortran95课程设计一、课程目标知识目标：1. 理解Fortran 95编程语言的基本概念和语法结构；2. 掌握Fortran 95的数据类型、变量声明和运算符使用；3. 学会使用控制结构（如循环、条件语句）进行程序设计；4. 了解数组、函数和子程序在Fortran 95中的应用。
技能目标：1. 能够编写简单的Fortran 95程序，实现基本的输入输出功能；2. 能够运用控制结构进行逻辑判断和循环操作；3. 能够使用数组进行批量数据处理；4. 能够编写简单的函数和子程序，实现代码的模块化。
情感态度价值观目标：1. 培养学生对编程的兴趣，激发自主学习编程的热情；2. 培养学生严谨、细致的编程习惯，注重代码的可读性和效率；3. 培养团队合作精神，学会在编程过程中与他人交流、协作；4. 提高学生的逻辑思维能力，培养解决实际问题的能力。
课程性质：本课程为计算机编程入门课程，以Fortran 95编程语言为载体，培养学生编程技能和逻辑思维能力。
学生特点：学生处于初中或高中阶段，具备一定的数学基础，对编程感兴趣，但可能缺乏实际编程经验。
教学要求：教师应注重理论与实践相结合，以实例为主线，引导学生掌握编程技能，培养编程兴趣。
同时，关注学生的个体差异，提供针对性的指导和支持。
通过本课程的学习，使学生能够达到上述课程目标，为后续编程学习打下坚实基础。
二、教学内容1. Fortran 95基础语法- 程序结构- 数据类型与变量声明- 运算符与表达式- 基本输入输出操作2. 控制结构- 选择结构（IF语句）- 循环结构（DO循环、WHILE循环）3. 数组与函数- 数组的基本操作与应用- 内置函数与自定义函数- 子程序与模块化编程4. 实践项目与案例分析- 简单的计算器程序- 温度转换程序- 数组排序程序- 函数与子程序的应用实例5. 编程规范与调试技巧- 编码规范与命名规则- 调试方法与技巧- 性能优化建议教学内容安排与进度：第一周：Fortran 95基础语法及程序结构第二周：数据类型与变量声明、运算符与表达式第三周：基本输入输出操作、选择结构（IF语句）第四周：循环结构（DO循环、WHILE循环）第五周：数组的基本操作与应用第六周：内置函数与自定义函数、子程序与模块化编程第七周：实践项目与案例分析（计算器程序、温度转换程序等）第八周：编程规范与调试技巧、性能优化本教学内容根据课程目标制定，涵盖了Fortran 95编程语言的核心知识点，通过理论与实践相结合的方式，使学生能够逐步掌握编程技能，培养解决实际问题的能力。
FORTRAN语言程序设计
n 是一个十进制数字(0~9)序列。
Kind值为：1、2、4、8之一。分别表示1、2、4、8个字节个数。
FORTRAN 90/95标准中整型常量的范围没有明确规定。
例如：122、0、-36、559_2
均为合法的整型常量
100.0、100，000、100 0、1002 均为非法的整型常量
5.6.2.2 实型常量
5.5 程序的书写格式 （1）固定格式：将一个语句行分为若干个区域，如下图所示
：
5.6 数据类型
5.6.1 基本概念 1.内部数据类型 FORTRAN语言将内部数据划分为以下类型： 整型 实型 算术型 数据类型 复型 逻辑型 字符型 2.种别 一个数据在内存中均占有一定字节个数的存储单元。上述每类数据都有 其不同的种别（即Kind）特性，即上述每类数据根据其种别特性（即 Kind值）的不同分别拥有不同字节个数的存储单元。 3.数据对象 1）常量：程序运行时，其值不能改变的量，称为常量。如:5,3等等。 2）变量：程序运行时，其值可以改变的量，如:变量a, a是一个存储单元
第四章 FORTRAN语言开发环境
详见教材：3.3 FORTRAN语言 开发环境
第五章 FORTRAN 语言基础知识
5.1 字符集
FORTRAN语言允许使用的字符集为：
程序设计语言(FORTRAN)理论课程教学大纲
《程序设计语言(FORTRAN）》课程教学大纲课程编号：总学时数：64(打算内)+16(打算外)总学分数：4课程性质：必修课适用专业：给水排水工程、环境工程、土木工程、工程力学、无机非金属材料工程、应用化学等工科专业。
一、课程的任务和大体要求：FORTRAN语言普遍应用于数值分析、科学计算和工程设计等领域，FORTRAN90/95是FORTRAN语言的最新版本，它是一个功能十分壮大且表现现代程序设计语言特点的新型程序设计语言，在社会上产生了普遍阻碍，许多高等学校、科研院所和公司企业开始引入和利用FORTRAN90/95语言。
《程序设计语言(FORTRAN)》课是运算机基础教学课程体系中一门重要的运算机技术基础课程，是给水排水工程、环境工程、土木工程、工程力学、无机非金属材料工程、应用化学等工科专业（方向）的一门学科基础课和专业必修课。
一、课程任务通过《程序设计语言(FORTRAN)》课程的学习，使学生了解和把握运算机程序设计的大体概念、大体知识和大体方式，了解和把握运算机求解问题的机制和方式，熟练把握FORTRAN90/95语言大体内容、编程技术和开发环境，能熟练运用FORTRAN90/95语言设计和编写比较复杂的FORTRAN90/95程序，有效解决本专业中碰到的一些数值计算和数据处置问题，使学生运算机应用能力取得显著提高，为专业应用和进展奠定基础。
二、大体要求(1) 了解程序设计的大体概念、大体知识和大体方式。
(2) 把握FORTRAN90/95大体内容，能设计和编写比较复杂的FORTRAN90/95程序。
(3) 把握FORTRAN90/95开发环境（Developer Studio），提高开发效率。
(4) 能结合本专业实际，熟练使用FORTRAN90/95解决有关数值计算和数据处置问题。
二、大体内容和要求：1．程序设计概述(1)程序设计语言。
(2)程序和程序设计。
(3)算法的大体概念和要紧特点。
Fortran课程设计报告_范文
中南大学课程设计报告书课程名称：Fortran语言课程设计班级：土木工程2005级06班学号：1201050624姓名：成丕富指导教师：蔡旭晖二○○六年六月目录一、课程设计任务书 (3)二、需求分析 (5)三、概要设计 (5)四、系统实现 (6)五、详细设计 (10)六、源程序代码 (12)七、总结 (28)八、参考文献 (28)《FORTRAN 程序设计课程设计》任务书一、 实践目的通过本课程设计，培养利用程序设计技术进行计算机与专业知识的交叉应用，综合解决实际问题的能力。
通过自己分析问题、寻求算法、编写、调试程序、解决问题的过程，掌握多模块结构的程序设计与调试方法，以及程序模块间的数据传递方法，建立提出问题、分析问题、解决问题的思维方式，促进灵活运用所学知识解决问题能力的提高。
二、 设计任务制作一个信息管理系统，从以下题目中任选其一。
1．上网查询各省会城市2005年生产总值(GDP)、农林牧渔业总产值、工业总产值，将数据。
以统一格式保存在一个纯文本文件tongji.dat 中。
编程实现：（1）从文件tongji.dat 中读取数据，计算全国省会2005年GDP 的平均值，统计GDP 高于平均值的城市数；（2）按第一产业（即农林牧渔业总产值与工业总产值之和）总产值的升序排序，将排序后的数据存入文件fenxi.dat 中。
（3）统计工业总产值在1000亿元以下、1000~2000亿元、2000~3000亿元、3000亿元以上的城市数，并绘制分布饼图和折线图。
（4）计算各城市2005年较2004年相比的GDP 增长幅度，计算并输出自己所在省的省会城市GDP 增长幅度在各省会城市中的排名。
2．已知[]ihk j i k j i k j i k ji k ijeh u u u uu 2)(1,)(1,)(,1)(,1)1(41-+++=-+-++，其中h=0.0021,,,1500,0,,500,0+==+⋅=+⋅=⋅⋅hi i hi i j j eu e u e h j u h j u)5000,5000(0.2)0(,<<<<=j i u j i 其中（1）计算)(,k j i u 及)()(,h j eu hi k j i ⋅+-⋅，k 、i 、j=0,1,2,….,500要求结果精确到小数点后第6位，并将结果输出到文件poisson.dat 中。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
中南大学课程设计报告书课程名称：Fortran语言课程设计班级：土木工程2007级04班学号：1201070404姓名：肖阳指导教师：刘泽星二○○八年七月《FORTRAN程序设计课程设计》报告书一、实践目的通过本课程设计，培养利用程序设计技术进行计算机与专业知识的交叉应用，综合解决实际问题的能力。
通过自己分析问题、寻求算法、编写、调试程序、解决问题的过程，掌握多模块结构的程序设计与调试方法，以及程序模块间的数据传递方法，建立提出问题、分析问题、解决问题的思维方式，促进灵活运用所学知识解决问题能力的提高。
二、设计任务制作一个信息管理系统1．某学校运动会管理系统。
将下列数据：运动员号(30名)、姓名、单位、比赛项目、比赛成绩。
以统一格式保存在纯文本文件中。
编程实现：（1）按比赛项目按成绩显示名次并存入文件中。
（2）按比赛项目、单位查询成绩。
（3）按单位统计金、银、铜牌数，并用柱形图表示。
三、设计报告要求1．设计报告字数一般不少于3000字，内容应层次分明，文字简练，说明透彻，立论正确。
2．报告要理论联系实际，运用科学的研究方法对选题进行综合分析，有完整的设计方案。
3．基本内容：（1）需求分析：包括设计题目、设计要求以及系统功能需求分析；（2）概要设计：包括系统总体设计框架和系统功能模块图；（3）详细设计。
包括主要功能模块的算法设计思路以及对应的工作流程图；（4）主要源程序代码。
包括存储结构设计说明，以及完整源程序清单；（5）调试分析过程描述。
包括测试数据、测试输出结果，以及对程序调试过程中存在问题的思考（列出主要问题的出错现象、出错原因、解决方法及效果等）；（6）总结。
包括对自己的工作作出客观的评价（优、缺点）和设计进一步的优化思路。
（7）附录和参考文献。
一、需求分析1．课题人工统计某学校召开运动会三个项目的参赛选手及成绩，编入文本TXT格式，编程实现：（1）从文件sport,txt中读取数据，统计个项目及人员成绩，将各项目按从高到低顺序排列，并输出，以便查询；（2）按从铅球，跳高，跳远的顺序降序排列各人员成绩，并将排序后的数据存入文件paiming.txt中;（3）统计各单位所获的奖牌（即金银铜牌数），输出。
（4）按比赛项目，单位查询任意成绩。
2．此课题有以下几点要求（1）从文本文件中直接读入数据。
（2）将数据保存在纯文本文件paiming.txt中。
（3）熟练运用各种排序手段。
（4）学会运用子程序的调用，动态数组的使用。
（5）绘制柱状图，这需要在QuickWin Application 环境下实现。
（6）实现主模块和子模块的连接。
二、概要设计（总体设计框架）1．本系统是在QuickWin Application 环境下实现的，由一个主模块和四个子模块组成。
其中主模块的功能是建立一个主界面，并和各个子模块连接。
五个子模块的程序名和功能如下：1.sco1：读入数据，输出，排列2.sco2：查询成绩，按单位，项目查询3.sco3：统计奖牌数目4.sco4：根据数据画出统计直方图2．各个模块的具体连接结构如下图：主控模块三、系统实现1．主要变量的定义①本系统主要处理的是全国GDP的数据，一条记录有很多个数据，用结构体数组s (23)来表示：type everyprovenceGDPcharacter*10 provencecharacter*10 capitalreal popuinteger(4) fontnumtype(xycoord) xyinteger(4) dummy,status2．文件的存取本课题涉及的文件的存取内容主要有：建立文件，打开文件，读文件，写文件和关闭文件。
在系统实现过程中用的都是有格式、直接存取的方式。
主要是这种直接存取方式读写数据时比较自由，可以在程序招待的过程中对任意一个指定的记录进行读写。
例如：open(3,file='quanguogdp.dat',access='direct',form='formatted',recl=100)300 format(a10,2x,a10,2x,f10.0,2x,f20.0,2x,f20.0)do i=1,23read(3,300,rec=i)m(i)end doclose(3)3．排序在设计过程中，多处用到了排序问题。
我是先把要排序的数据值赋给一个数组，然后用选择排序法对此数组进行排序，然后返回进行其它操作。
选择排序法是排序法中比较好的一种方法，在很多地方都有应用。
4．在QuickWin Application界面中显示图文QuickWin Application环境中主要调用的模块是msflib模块，我的这个系统主要调用的子程序如下：Initializefonts 初始化前景floodfillrgb 颜色填充setcolorrgb 设置颜色setfont 设置字体clearscreen 清空屏幕moveto 移动光标outgtext 显示字符pie 画扇形lineto 画直线5．主模块和子模块的连接在主模块中用一个if 语句来和不同的子模块建立连接，调用子模块（子例行程序）。
返回主模块的时候有很多方法，可以用goto 语句来返回，也可以用一个循环结构配合read 语句来实现。
本系统采用的是后一种方法。
6．数据的公用在编程实现过程中会遇到各个子程序之间数据的传输问题，比如在绘制饼图和折线图的时候就要用到前面的统计数据，这时就要用common 语句实现不同程序单元之间的数据通信。
本系统中涉及到一处，故只需建立一个无名公用区：Common k1,k2,k3,k47.数据类型的转换在QuickWin Application中输出文件时，必须要把文件中的数据全部改成字符型数据才会显示出来。
这就要用到read语句或者write语句。
比如：write(char,40)ave40 format(f20.0)上面这段程序就实现了将ave 的数值赋给字符变量char 。
在数据形成文件时，也可以直接读取文件中的记录，本系统在实现过程中多数采用了这种方法。
比如在输出源数据的时候：open(1,file='quanguogdp.dat',access='direct',form='formatted',recl=80)read(1,200)t200 format(a80)close(1)8．界面设计在设计界面的时候，基本上是一个模块对应一个界面（有时有两个）。
各个界面切换的时候都会在界面上显示一些提示信息。
每个界面都经过精心设计，背景，字体，表格等都达到最佳的视觉效果。
下面是一些主要的界面：主界面源数据 统计结果按工业总产值排序 分布结果饼图折线图 增长率排名设计主界面包括前景，背景，字体，整体框架等输入整数inputY input=0?9．系统测试用户启动本系统后，会看到一个系统主界面。
按照界面上提示提示信息用户可以选择不同的功能。
①用户若选择输入1，再回车，则将切换到另一个界面，用户可以选择输入数据或直接查看源数据。
若直接查看源数据，则会切换到一个数据界面。
这时用户可根据提示信息随便输入一个整数，再回车就可以回到主界面。
②用户若选择输入2，再回车，则将切换到统计结果界面。
随便输入一个整数，再回车可以回到主界面。
③用户若选择输入3，再回车，则系统会自动按工业总产值排序，并显示在屏上，在文件夹里还会生成文件。
随便输入一个整数，再回车可以回到主界面。
④用户若选择输入4，再回车，则界面会显示工业总产值在1000亿元以下、1000~2000亿元、2000~3000亿元、3000亿元以上的城市数。
再随便输入一个整数，回车就会转到分布饼图界面。
再随便输入一个整数，回车就会转到分布折线图界面。
随便输入一个整数，再回车可以回到主界面。
⑤用户若选择输入5，再回车，则界面会显示GDP 增长率和排序结果，随便输入一个整数，再回车可以回到主界面。
⑥用户若选择输入0，再回车，则退出本系统。
四、详细设计1．主模块（Program EVERYPROVENCEGDP_SYSTEM ）流程图2．Subroutine inputdata①清屏，设计界面，写提示语。
②从键盘输入一个字符char6。
用一个if 语句，若char6为空，则等待用户输入源数据，存入文件quanguogdp.dat中；若char6 不为空，继续。
③读取quanguogdp.dat中的数据，给s (23) 赋值。
④将s (23) 显示在界面上，画表格。
显示返回提示语。
3．Subroutine tongji①读取quanguogdp.dat中的数据，给s (23) 赋值。
②用一个循环结构统计gdp 总数sum ，计算平均值ave=sum/23 。
③用循环结构统计gdp 高于ave的城市数k 。
④清屏，设计初始界面。
⑤在界面上显示统计结果，显示返回提示语。
4．Subroutine gdppaixu①读取quanguogdp.dat中的数据，给s (23) 赋值。
②用选择排序法升序排列s(23).gdp。
③将排序后的s (23) 按格式（a10,2x,a10,2x,f10.0,2x,f20.0,2x,f20.0）写入文件paixu.dat中。
④清屏，将s (23) 显示在界面上，画表格。
显示返回提示语。
5．Subroutine fenduan①读取quanguogdp.dat中的数据，给s (23) 赋值。
②用循环结构读取quanguogdp.dat中的数据，同时统计工业总产值在1000亿元以下、1000~2000亿元、2000~3000亿元、3000亿元以上的城市数k1,k2,k3,k4。
③清屏，设计初始界面。
④在界面上显示统计结果，显示下一步提示语。
6．Subroutine bingtu①用公用区实现数据k1,k2,k3,k4通信。
②进行坐标换算，将一个整圆分块。
在使用PIE函数画扇形的时候，需要用到8个参数。
本系统在绘制饼图的时候（如右图），先确定圆的大小，即：x1=300;y1=100x2=700;y2=500还要确定第一个扇形的始边，即x3=500;y3=100剩下的三个点就要利用k1,k2,k3,k4来计算：x4=500-200*cos((2.0*k1/23.0-0.5)*py)y4=300+200*sin((2.0*k1/23.0-0.5)*py)x5=500+200*cos((2.0*(k1+k2)/23.0-1.5)*py)y5=300-200*sin((2.0*(k1+k2)/23.0-1.5)*py)x6=500+200*cos((2.0*(k1+k2+k3)/23.0-1.5)*py)y6=300-200*sin((2.0*(k1+k2+k3)/23.0-1.5)*py)其中py=3.14159265③清屏，设计初始界面。