F90 第10章

姓名数组names： △ △ …… △ …… △ 商品销售管理中要处理每种商品购销数据,商品购销数据由编号、品 CHARACTER*8 name,names(30) !声明保存姓名的变量和数组 名、类别、单价、库存、购入日期、售出总量、利润等项组成。 性别数组sexes： △ △ …… △ …… △ CHARACTER*4 sex,sexes(30) !声明保存姓别的变量和数组 职工档案管理中要处理每个职员档案数据,职员档案数据由工号、姓 年龄数组ages： △ △ …… △ …… △ 名、性别、年龄、出生日期、家庭住址、工资等项组成。 INTEGER age,ages(30) !声明保存年龄的变量和数组 10.1 概述/数组类型实现示例/数组关系 地址数组addresses： △ △ …… △ …… △ 汽车生产管理中要处理每个汽车自然数据,汽车自然数据由编号、名 CHARACTER*30 address,addresses(30) !声明保存地址的变量和数组 称、类别、成本、售价、颜色、生产日期等项组成。 成绩数组av_scores： △ △ …… △ …… △ REAL av_score,av_scores(30) !声明保存平均成绩的变量和数组 这类数据可用内部数据类型和数组类型实现，但难度较大，不太方便。 入党数组members： △ △ …… △ …… △ LOGICAL member,members(30) !声明保存是否入党的变量和数组 FORTRAN90引入派生类型和结构体可方便实现这类问题。派生类型和 结构体是现代程序设计语言普遍采用的描述复杂数据的重要手段。 通过7个赋值语句生成第i个学生学籍信息。（示例） 派生类型和结构体是FORTRAN90重要内容，需熟练掌握。 7个数组都与每个学生有关，通过下标建立联系。（图示）
派生类型和结构体是FORTRAN90重要内容，需熟练掌握。
第八章
派生类型与结构体
西安科技大学计算机学院
07/08第一学期
8.1 概述
处理30名学生的学籍管理程序，需声明用于保存一名学生和一批 在现实世界中遇到的问题种类繁多,涉及的数据千变万化，不但涉 学生学籍信息的变量和数组。 及5种内部数据类型和数组类型这样的预定义类型，而且会涉及由多 个不同数据成分组成的复杂数据。如： 学生的学籍信息有：学号、姓名、性别、年龄、住址、平均程序、 是否党员。 学生学籍管理中要处理每个学生学籍数据,学生学籍数据由学号、姓 名、性别、年龄、家庭住址、平均成绩、是否党员等数据成分组成。 INTEGER number,numbers(30) !声明保存学号的变量和数组
学生学籍管理中要处理每个学生学籍数据,学生学籍数据由学号、姓
名、性别、年龄、家庭住址、平均成绩、是否党员等数据成分组成。
商品销售管理中要处理每种商品购销数据,商品购销数据由编号、品
名、类别、单价、库存、购入日期、售出总量、利润等项组成。
职工档案管理中要处理每个职员档案数据,职员档案数据由工号、姓
商品销售管理中要处理每种商品购销数据,商品购销数据由编号、品 ages(i)=20
CHARACTER*8 name,names(30) !声明保存姓名的变量和数组 名、类别、单价、库存、购入日期、售出总量、利润等项组成。 addresses(i)='江苏苏州新区滨河路298号' CHARACTER*4 sex,sexes(30) !声明保存姓别的变量和数组 职工档案管理中要处理每个职员档案数据,职员档案数据由工号、姓 av_scores(i)=85.5 名、性别、年龄、出生日期、家庭住址、工资等项组成。 INTEGER age,ages(30) !声明保存年龄的变量和数组 10.1 概述/数组类型实现示例/数组赋值 members(i)=.TRUE. 汽车生产管理中要处理每个汽车自然数据,汽车自然数据由编号、名 CHARACTER*30 address,addresses(30) !声明保存地址的变量和数组 称、类别、成本、售价、颜色、生产日期等项组成。 !通过以下输入语句输入第i个学生学籍信息 REAL av_score,av_scores(30) !声明保存平均成绩的变量和数组 这类数据可用内部数据类型和数组类型实现，但难度较大，不太方便。 LOGICAL READ*,numbers(i),names(i),sexes(i),ages(i) member,members(30) !声明保存是否入党的变量和数组 FORTRAN90引入派生类型和结构体可方便实现这类问题。派生类型和 结构体是现代程序设计语言普遍采用的描述复杂数据的重要手段。 READ*,addresses(i),av_scores(i),members(i) 通过7个赋值语句生成第i个学生学籍信息。（示例） 派生类型和结构体是FORTRAN90重要内容，需熟练掌握。 7个数组都与每个学生有关，通过下标建立联系。（图示）
商品销售管理中要处理每种商品购销数据,商品购销数据由编号、品
CHARACTER*8 name,names(30) !声明保存姓名的变量和数组 名、类别、单价、库存、购入日期、售出总量、利润等项组成。 CHARACTER*4 sex,sexes(30) !声明保存姓别的变量和数组 职工档案管理中要处理每个职员档案数据,职员档案数据由工号、姓 名、性别、年龄、出生日期、家庭住址、工资等项组成。 INTEGER age,ages(30) !声明保存年龄的变量和数组 10.1 概述/数组类型实现示例 汽车生产管理中要处理每个汽车自然数据,汽车自然数据由编号、名 CHARACTER*30 address,addresses(30) !声明保存地址的变量和数组 称、类别、成本、售价、颜色、生产日期等项组成。 REAL av_score,av_scores(30) !声明保存平均成绩的变量和数组 这类数据可用内部数据类型和数组类型实现，但难度较大，不太方便。 LOGICAL member,members(30) !声明保存是否入党的变量和数组 FORTRAN90引入派生类型和结构体可方便实现这类问题。派生类型和 结构体是现代程序设计语言普遍采用的描述复杂数据的重要手段。 通过7个赋值语句生成第i个学生学籍信息。（示例） 派生类型和结构体是FORTRAN90重要内容，需熟练掌握。 7个数组都与每个学生有关，通过下标建立联系。（图示）
第八章 派生类型与结构体
西安科技大学计算机学院 07/08第一学期
8.1 概述
处理30名学生的学籍管理程序，需声明用于保存一名学生和一批 在现实世界中遇到的问题种类繁多,涉及的数据千变万化，不但涉 学生学籍信息的变量和数组。 及5种内部数据类型和数组类型这样的预定义类型，而且会涉及由多 数组之间的相互关系： 第i名学生学籍信息 个不同数据成分组成的复杂数据。如： 学生的学籍信息有：学号、姓名、性别、年龄、住址、平均程序、 1 2 i n 是否党员。 学生学籍管理中要处理每个学生学籍数据,学生学籍数据由学号、姓 学号数组numbers： △ △ …… △ …… △ 名、性别、年龄、家庭住址、平均成绩、是否党员等数据成分组成。 INTEGER number,numbers(30) !声明保存学号的变量和数组
第八章 派生类型与结构体
西安科技大学计算机学院 07/08第一学期
8.1 概述
使用派生类型和结构体处理30名学生学籍信息。 在现实世界中遇到的问题种类繁多,涉及的数据千变万化，不但涉 声明一个派生类型、一个结构体、一个结构体数组。 及5种内部数据类型和数组类型这样的预定义类型，而且会涉及由多 个不同数据成分组成的复杂数据。如： !定义一个派生数据类型student_record,描述学生学籍信息 TYPE student_record 学生学籍管理中要处理每个学生学籍数据,学生学籍数据由学号、姓 名、性别、年龄、家庭住址、平均成绩、是否党员等数据成分组成。 INTEGER number 商品销售管理中要处理每种商品购销数据,商品购销数据由编号、品 CHARACTER*8 name 名、类别、单价、库存、购入日期、售出总量、利润等项组成。 CHARACTER*4 sex 职工档案管理中要处理每个职员档案数据,职员档案数据由工号、姓 INTEGER age 名、性别、年龄、出生日期、家庭住址、工资等项组成。 10.1 概述/派生类型实现示例/结构体数组赋值 !通过1个赋值语句生成第i个学生学籍信息 CHARACTER*30 address 汽车生产管理中要处理每个汽车自然数据,汽车自然数据由编号、名 REAL av_score students(i)=student_record(9800301,„王 称、类别、成本、售价、颜色、生产日期等项组成。 强’,„男’,20,& LOGICAL member 这类数据可用内部数据类型和数组类型实现，但难度较大，不太方便。 END TYPE & „江苏苏州新区滨河路298号’,85.5,.TRUE. FORTRAN90引入派生类型和结构体可方便实现这类问题。派生类型和 TYPE(student_record) student,students(30) 结构体是现代程序设计语言普遍采用的描述复杂数据的重要手段。 !通过以下输入语句输入第i个学生学籍信息 通过1个赋值语句生成第i个学生学籍信息。（示例） 派生类型和结构体是FORTRAN90重要内容，需熟练掌握。 READ*,students(i) 1个数组保存所有学生学籍信息。（图示）
第八章 派生类型与结构体
西安科技大学计算机学院 07/08第一学期
8.1 概述
使用派生类型和结构体处理30名学生学籍信息。 在现实世界中遇到的问题种类繁多,涉及的数据千变万化，不但涉 声明一个派生类型、一个结构体、一个结构体数组。 及5种内部数据类型和数组类型这样的预定义类型，而且会涉及由多 个不同数据成分组成的复杂数据。如： !定义一个派生数据类型student_record,描述学生学籍信息 TYPE student_record 学生学籍管理中要处理每个学生学籍数据,学生学籍数据由学号、姓 名、性别、年龄、家庭住址、平均成绩、是否党员等数据成分组成。 INTEGER number 商品销售管理中要处理每种商品购销数据,商品购销数据由编号、品 CHARACTER*8 name 名、类别、单价、库存、购入日期、售出总量、利润等项组成。 CHARACTER*4 sex 职工档案管理中要处理每个职员档案数据,职员档案数据由工号、姓 INTEGER age 名、性别、年龄、出生日期、家庭住址、工资等项组成。 10.1 概述/派生类型实现示例 CHARACTER*30 address 汽车生产管理中要处理每个汽车自然数据,汽车自然数据由编号、名 REAL av_score 称、类别、成本、售价、颜色、生产日期等项组成。 LOGICAL member 这类数据可用内部数据类型和数组类型实现，但难度较大，不太方便。 END TYPE FORTRAN90引入派生类型和结构体可方便实现这类问题。派生类型和 TYPE(student_record) student,students(30) 结构体是现代程序设计语言普遍采用的描述复杂数据的重要手段。 通过1个赋值语句生成第i个学生学籍信息。（示例） 派生类型和结构体是FORTRAN90重要内容，需熟练掌握。 1个数组保存所有学生学籍信息。（图示）