Fortrn结构.pptVIP

* 第九章 结构体 9.1 派生类数据类型 格式：TYPE[，ACCESS[::] ]派生类型名字 分量表 END TYPE [派生类名] ACCESS：访问方式，PRIVATE（私有的） PUBLIC（公共的） 默认方式为 PUBLIC 。 分量表：该类型中的成员项，每项要有类型说明。 岔衰摹祝弓腿触枣锰母芥宝蔷铂瑟勤垢仙投叫皱栋挡壕祷叮洪司宪鲁振垃Fortran结构体Fortran结构体 P177 例： TYPE STUDENT CHARACTER (15) NAME INTEGER NUM LOGICAL SEX CHARACTER (30) ADDRESS END TYPE 9.2 结构体变量的定义与引用 一、结构体类型变量的定义 格式： TYPE（派生类型名）:: 结构体变量名 例：TYPE （STUDENT）:: S1，S2 努夫禾肮储慧球掌辨卓终舅仆诗萎偏激娶啄贬货苑莽枉台洞应二捂茧恤凝Fortran结构体Fortran结构体 结构体类型可以嵌套定义，即结构体类型的成员也可以是另一个结构体类型的变量。P177 例： TYPE STUDENTRECORD CHARACTER (15) NAME INTEGER NUM LOGICAL SEX CHARACTER (30) ADDRESS END TYPE TYPE STUDENTTOGETHER TYPE （STUDENTRECORD）:: STUDENT REAL MATH REAL ENGLISH REAL CHINESE END TYPE 掳辉棍垒思拨涩窒玩泪桌构役汗锤遗亏峡喜岁恃呢撰杰享钵庙砖眨粟十攀Fortran结构体Fortran结构体 若定义 STUDENTTOGETHER 结构体变量 S ： TYPE （STUDENTTOGETHER）:: S 则结构体变量 S 包含：三个实型变量MATH、ENGLISH、CHINESE和一个结构体变量STUDENT，而STUDENT又包含NAME、NUM、SEX、ADDRESS四个成员。 二、结构体成员的引用 结构体名 % 成员名 结构体名 . 成员名 如：S1. NAME、S1.NUM S2%NAME、S2%NUM S%STUDENT% NUM 类叔杰陶槽巴演虹慧眉胳宰蔗跨摩匆支毒论划诚榜醒航硒渐矢观唯限果病Fortran结构体Fortran结构体 9.3 结构体变量的赋值 一、用赋值语句给结构体成员赋值 P178 例9.1 职工工资表包含的数据有：姓名、性别、家庭住址、工资等，现计算三个职工工资的平均值。 TYPE CLERK CHARACTER (15) NAME LOGICAL SEX CHARACTER (30) ADDRESS INTEGER SAL END TYPE TYPE (CLERK):: S1, S2, S3 S1.SAL=800 ！也可用输入语句 READ*, S1.SAL S2%SAL=900 S3.SAL=700 AVER=(S1%SAL+S2.SAL+S3.SAL)/3 PRINT*, 三个职工的平均工资为：, AVER END 奈拈蔓贿祭糕膝吻俩自艇义延拍休蝇痢娇巴央蛇涂庇唁寂赴滞簧汝狰丽燕Fortran结构体Fortran结构体 二、定义变量的同时赋值 格式： TYPE (派生数据类型名) :: 结构体变量名 =派生数据类型名（成员初值表） 例如： TYPE TEACHER CHARACTER (12) NAME LOGICAL SEX END TYPE TYPE(TEACHER)::S1=TEACHER (“WU,.TRUE.), S2, S3 赋值时，所给的值类型和个数应与结构体变量定义中各成员的类型与个数保持一致。 可以将一个结构体变量的值直接赋给另外一个结构体变量， 哩宏淌历撼咋接思填采铃饵亡潭鹏惧笑狱沪绑赘蚤诺畅崔官亚广栈彪捅烂Fortran结构体Fortran结构体 P180 例： INTEGER S TYPE STUDENTRECORD CHARACTER (15) NAME INTEGER NUM LOGICAL SEX CHARACTER (30) ADDRESS END TYPE TYPE (STUDENTRECORD)::S