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