fortran90程序设计第二版哈尔滨工程大学

第二章 Digital Visual FORTRAN 5.0 入门

FORTRAN语言是最早出现的计算机高级程序设计语言,它对程序设计语言的研究和发展产生了极其深刻的影响。随着计算机科学技术的飞速发展,FORTRAN语言也不断得到完善和充实,从传统FORTRAN,到结构化FORTRAN,再到具有现代特征的Digial Visual FORTRAN 5.0。

本章将介绍FORTRAN语言的发展历史、Digital Visual FORTRAN 5.0简介、Microsoft Developer Studio开发环境、FORTRAN 90语言书写格式,以及FORTRAN 90程序的编辑、创建、打开、保存、编译、连接和运行等内容。

2.1 FORTRAN语言发展概述

FORTRAN是英文“FORmula TRANslator”的缩写,译为“公式翻译器”,它是世界上最早出现的计算机高级程序设计语言,广泛应用于科学和工程计算领域。FORTRAN语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。

早在1951年,美国IBM公司约翰·贝克斯(John Backus)针对汇编语言的缺点着手研究开发FORTRAN语言,并于1954年在纽约

第二章 Digital Visual FORTRAN 5.0 入门

FORTRAN语言是最早出现的计算机高级程序设计语言,它对程序设计语言的研究和发展产生了极其深刻的影响。随着计算机科学技术的飞速发展,FORTRAN语言也不断得到完善和充实,从传统FORTRAN,到结构化FORTRAN,再到具有现代特征的Digial Visual FORTRAN 5.0。

本章将介绍FORTRAN语言的发展历史、Digital Visual FORTRAN 5.0简介、Microsoft Developer Studio开发环境、FORTRAN 90语言书写格式,以及FORTRAN 90程序的编辑、创建、打开、保存、编译、连接和运行等内容。

2.1 FORTRAN语言发展概述

FORTRAN是英文“FORmula TRANslator”的缩写,译为“公式翻译器”,它是世界上最早出现的计算机高级程序设计语言,广泛应用于科学和工程计算领域。FORTRAN语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。

早在1951年,美国IBM公司约翰·贝克斯(John Backus)针对汇编语言的缺点着手研究开发FORTRAN语言,并于1954年在纽约

第二章 Digital Visual FORTRAN 5.0 入门

FORTRAN语言是最早出现的计算机高级程序设计语言,它对程序设计语言的研究和发展产生了极其深刻的影响。随着计算机科学技术的飞速发展,FORTRAN语言也不断得到完善和充实,从传统FORTRAN,到结构化FORTRAN,再到具有现代特征的Digial Visual FORTRAN 5.0。

本章将介绍FORTRAN语言的发展历史、Digital Visual FORTRAN 5.0简介、Microsoft Developer Studio开发环境、FORTRAN 90语言书写格式,以及FORTRAN 90程序的编辑、创建、打开、保存、编译、连接和运行等内容。

2.1 FORTRAN语言发展概述

FORTRAN是英文“FORmula TRANslator”的缩写,译为“公式翻译器”,它是世界上最早出现的计算机高级程序设计语言,广泛应用于科学和工程计算领域。FORTRAN语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。

早在1951年,美国IBM公司约翰·贝克斯(John Backus)针对汇编语言的缺点着手研究开发FORTRAN语言,并于1954年在纽约

第四章 内部数据类型与表控输入输出

FORTRAN 90预定义五种内部数据类型:整型(INTEGER)、实型(REAL)、复型(COMPLEX)、字符型(CHARACTER)和逻辑型(LOGICAL),每种类型都具有参数化特性(KIND参数),通过KIND参数可对内部数据类型进行细化,它们是程序中使用最广泛的数据类型。用户可直接使用内部数据类型说明数据对象(常量、变量、数组等)。

内部数据类型分为两类:数值型(整型、实型和复型)和非数值型(字符型和逻辑型)。 在程序中需要选择和使用符合精度和范围要求的数据类型。FORTRAN 90内部数据类型具有参数化特性,通过KIND值参数确定数据最佳的存储开销、精度和范围。表4-1给出内部数据类型的不同KIND值参数及存储开销。

表4-1 内部数据类型KIND值参数及存储开销

类型 BYTE INTEGER 整型 INTEGER(1) INTEGER(2) INTEGER(4) INTEGER(8) REAL 实型 REAL(4) REAL(8) COMPLEX 复型 COMPLEX(4) DOUBLE COMPLEX COMPLEX(8) CHARACTER 字符型 CHARACTER*len

实验二 掌握FORTRAN90基础知识

程序设计语言是一类形式化的人工语言，每一个程序设计语言都有其严格的词法、语法和语义规定，对字符集的使用、实体名称的描述、程序结构的组织、语句次序的排列、程序格式的书写和数据类型的定义等都有明确的要求。不同的程序设计语言其规定和要求有所不同，任何不符合语言规定和要求的程序均为不合法程序（错误程序）。理解和掌握有关程序设计语言的基础知识和基本概念，是学习程序设计方法的重要环节和基本前提。

FORTRAN90有明确的字符集使用规定、严格的名称描述语法、清晰的程序组织结构、严谨的语句排列次序、灵活的程序书写格式和丰富的数据类型定义。必须首先学习、理解和掌握FORTRAN90这些基础知识和基本概念，为进一步学习FORTRAN90程序设计奠定坚实基础。

本实验是学习和掌握FORTRAN90基础知识和基本概念的一次系统实验活动。

一． 一． 实验目的

1． 2． 3． 4． 5． 6． 7．

1． 了解FORTRAN90字符集。

2． 掌握FORTRAN90实体名称的语法描述规则和具体使用要求。 3． 了解FORTRAN90关键字意义，以及与名称的区别。

4． 掌握FORTRAN90程序组织结构和语

选择结构程序设计作业

前面学习了比较简单的顺序结构程序设计，在顺序结构程序中每条语句都是按书写顺序依次顺序执行。使用顺序结构编写程序，只能求解逻辑关系非常简单的问题，可是许多实际问题，往往具有复杂的逻辑关系，仅使用顺序结构难以编写程序，需要使用更复杂的程序结构，如选择结构(分支结构)。选择结构是求解复杂问题和体现程序智能化的重要程序结构。

FORTRAN90提供了多种用于实现选择结构的语句，如：逻辑IF语句、块IF语句、多支块IF语句和SELECT语句，其中SELECT语句是FORTRAN90新引入的用于实现块CASE结构的语句，它与多支块IF语句在功能上非常相似，但在某些情况下，使用SELECT语句比使用多支块IF语句更简洁和高效。

本实验是学习和掌握关系表达式、逻辑表达式、选择结构语句、选择结构程序设计方法的一次系统实验活动。通过本次实验，能设计和编写简单的具有选择结构的程序，为学习和掌握更复杂的程序结构和程序设计方法奠定基础。

一． 实验内容1

1．问题描述

某高校实行学分制，学分制规定：成绩大于等于60分可获得3个学分和3个绩点，否则不能获得学分和绩点，同时成绩大于等于80分可增加2个绩点。输入学生成绩，计算并输出学生获得的学分和绩点

数组--程序设计作业

数组是FORTRAN90最重要的结构数据类型之一。许多实际问题往往设计大量的数据，数组是存储和处理大批量数据的有效工具，有些问题如果不用数组求解将难以解决。

数组是类型相同且有序的一组数据，涉及到这类数据均可考虑使用数组。

本次实验是学习和掌握数组声明、数组元素引用、数组输入输出、数组赋初值的一次系统实验活动。通过本次实验，能够设计和编写比较简单的数组应用程序。

一．实验内容1

1．问题描述

已知10个正整数：10、55、25、70、45、15、25、85、45、35，输入一个待删除整数，在10个整数中查找，若有该整数，则将其删除，输出删除前后这组整数。编写程序实现之。

2．算法设计

已知的10个正整数符合数组定义，用一维整型数组num保存，用数组构造器赋初值。

待删除整数n从键盘输入。

算法基本思想：输入待删除整数，从第1个数组元素num(1)开始，依次用n去比较是否相等，若相等查找成功，将该数组元素删除(在该数组元素位置设置删除标志)，直到第10个数组元素检查比较完毕。输出删除前后数组元素。

因10个整数为正数，所以删除标志可用-1表示。 算法：

(1) 输入待删除整数n；

(2) 输出删除前１０个整数； (3) 用

Fortran90关于变量说明的新功能：

1.在变量说明的同时，可以给变量赋初值。 INTEGER::I=5，J=126

REAL::X=7.2，Z，W=774.2

2.在说明变量的同时也可说明其种别 REAL(KIND=4)::X,Y 或 REAL(4)::X,Y

3.在说明变量的同时，还可说明变量的属性

INTEGER，PARAMETER::I=5，J=123

Ps :PARAMETER 属性

（1）功能：用一个符号代表一个常量，称为符号常量（常数） （2）写法：

Real，Parameter ：：G=9.8 &&说明类型时赋值 （3）位置：位于可执行语句之前

REAL，DIMENSION(1:10)::A 2.3.6 派生数据类型

根据需要而由基本数据类型定义新的数据类型。在一个派生类型中可包含多个基本类型。

如：TYPE STUDENT (定义开始)

CHARACTER(LEN=20)::DEPARTMENT CHARACTER(LEN=10)::CLASS CHARACTER(LEN=15)::NAME

MATLAB第二版课后答案unit3-8

unit3

实验指导

1、 n=input('请输入一个三位数：'); a=fix(n/100); b=fix((n-a*100)/10); c=n-a*100-b*10; d=c*100+b*10+a 2（1）

n=input('请输入成绩'); switch n

case num2cell(90:100) p='A';

case num2cell(80:89) p='B';

case num2cell(70:79) p='C';

case num2cell(60:69) p='D'; otherwise

p='E'; end

price=p

（2）n=input('请输入成绩'); if n>=90&n<=100 p='A';

elseif n>=80&n<=89 p='B';

elseif n>=70&n<=79 p='C';

elseif n>=60&n<=69 p='D'; else p='E'; end price=p （3）try n;

catch

price='erroe' end

3

n=[1,5,56,4,3,476,45,6,3,76,45,6,4,3,6,4,23,76,908,6];

a=n(1)； b=n(1); for m=2:20 if n(m)>a a=

第二章基本控制结构程序设计习题 1

第一章 C++基础知识习题

1.1 判断下列标识符的合法性。 sin book 5arry _name Example2.1 main $1 class_cpp a3 x*y my name

答：合法的：sin book _name main class_cpp a3 非法的：5arry Example2.1 $1 x*y my name

1.2 假定有下列变量： int a=3,b=5,c=0;

float x=2.5,y=8.2,z=1.4;

char ch1=’a’,ch2=’5’,ch3=’0’,ch4;

求下列表达式的值，以及运算后表达式所涉及的各变量的值。

x+(int)y%a x=z*b++,b=b*x,b++ ch4=ch3-ch2+ch1 int(y/z)+(int)y/(int)z !(a>b)&&c&&(x*=y)&&b++ ch3||(b+=a*c)||c++ z=(a<<2)/(b>>1)

答：x+(int)y%a 表达式值为：4