资源描述：
《Fortran语言上机实验报告7》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、《FORTRAN语言》实验（上机）报告班级·学号桥三201118020312姓名周佳程实验日期11.23任课教师吴建华实验名称实验七派生类型和指针程序设计操作型一、实验目的（1）掌握结构体的概念、定义、格式及引用和初始化方法；（2）掌握结构体数组的定义；(3)掌握指针的概念、定义格式和使用；(4)理解动态变量的含义。二、实验内容：1、有以下程序：IMPLICITNONETYPEpersonCHARACTERname*8REALsalaryREALawardREALcostENDTYPEINTEGERI,J,NUMPARAMETER(
2、NUM=10)TYPE(person),DIMENSION(NUM)::clerkDOi=1,NUMREAD*,clerk(i).name,clerk(i).salary,clerk(i).award,clerk(i).costENDDODOJ=1,NUMIF(clerk(j).salary+clerk(j).award–clerk(j).cost>=1200)THENPRINT*,clerk(j).name,clerk(j).salary,clerk(j).award,clerk(j).costENDIFENDDOEND运行程序，
3、输入以下数据：“Lister”,876,451,123“Angel”,746,523,23“Billy”,912,551,243“Henry”,926,660,314“Ervine”,676,481,103“Ford”,816,351,89“George”,936,451,145“Mailer”,766,480,98“Philip”,880,560,168“Victor”,660,440,86输出结果为：。2、以下程序用于在屏幕上输出如下图形：121321432154321IMPLICITNONEINTEGER，POINTER：：p
4、(：)INTEGER，TARGET：：X(5,5)INTEGERix=0DOi=1,5p=>x(1:i,1)p=p+1PRINT*,pENDDOEND请将程序略作修改，用于输出下列图形：(1)(2)111111222222333333444444555555三、实验平台FortranPowerStation4.0四、程序清单及运行结果要求：第1题写出运行结果，第2题写出程序清单。1.输出结果为：“Lister”,876,451,123“Angel”,746,523,23“Billy”,912,551,243“Henry”,926,6
5、60,314“George”,936,451,145“Philip”,880,560,1682.(1)IMPLICITNONEINTEGER,POINTER::P(:)INTEGER,TARGET::X(5,5)INTEGERIX=0DOI=5,1,-1P=>X(1:I,1)P=5-I+1PRINT*,PENDDOEND(2)IMPLICITNONEINTEGER,POINTER::P(:)INTEGER,TARGET::X(5,5)INTEGERIX=0DOI=1,5P=>X(1:I,1)P=IPRINT*,PENDDOEND五、
6、教师批语与成绩评定：年月日
