Fortran 和C++学习笔记

FORTRAN

1. GOTO语句设计循环结构

S1 IF（逻辑表达式）THEN

循环体

GOTO S1

ENDIF

例；

PROGRAM MAIN

I=0

5 IF（I.LT.5）THEN

READ *，H，W0

W1=110-W0

IF（ABS（W0-W1）.LE.5）THEN

PRINT *，‘标准’

ELSE IF（W0.GT.W1）THEN

PRINT *，‘过胖’

ELSE

PRINT *，‘过瘦’

ENDIF

I=I+1

GOTO 5

ENDIF

END

例

PROGRAM MAIN

INTEGER FCH

READ *，M，N

K=MIN（M，N）

I=1

5 IF（I.LE.K）THEN

IF（MOD（M，I）.EQ.0.AND.MOD（N，I）.EQ.O）FCH=I

I=I+1

GOTO 5

ENDIF

WRITE（*，100）M，‘和’，N，‘的最大公约数是：’，FCH

100FORMAT（1X，I4，A，I4，A，I4）

END

此例中红色部分的“if”语句没有“then”和“endif”语句，且FCH = 1 直接接在“if”语句之后

2逻辑

IF

语句与

GOTO 语句设计的循环程序

用逻辑

IF

语句与

GOTO

语句实现循环一般是针对“直到型”循环，一般格式是：

S1 循环体

IF（逻辑表达式） GOTO S1

例

PROGRAM MAIN

I=0

5READ *，H，W0

W1=110-W0

IF（ABS（W0-W1）.LE.5）THEN

PRINT *，‘标准’

ELSE IF（W0.GT.W1）THEN

PRINT *，‘过胖’

ELSE

PRINT *，‘过瘦’

ENDIF

I=I+1

IF（I.LT.5）GOTO 5

END

2 DO-WHILE 循环

DO 标号[，] WHILE（逻辑表达式）

循环体

标号终端语句

或者:

DO WHILE（逻辑表达式）

循环体

ENDDO

例

DO 10 WHILE（I.LE.20）

K=I*I

PRINT*，I，K

I=1+1

10 CONTINUE

当WHILE（I.LE.20）的条件I.LE.20为假时，循环结束，跳到标号为“10”的语句。程序结构非常清晰，在DO-WHILE 和CONTINUE之间就是循环体。或者写成:

DO WHILE（I.LE.20）

K=I*I

PRINT*，I，K

I=1+1

ENDDO

3 DO循环

DO循环语句也可以写成下面形式，但必须与ENDDO配对使用：

DO v=e1，e2 [，e3]

循环体

ENDDO

S：表示循环终端语句标号，s是statement的缩写。

v：表示循环变量，可以是任何合法的变量名，v是variable的缩写。

e1，e2，e2：分别表示循环初值表达式、循环终值表达式、循环步长值表达式，e是expression 的缩写

方括号“[ ]”中的内容为可选项。下面形式的DO语句都是合法的形式：

DO 20，I=1，20，2 DO 10，N=1，5

DO 100 X=1.2，3.5，1.0

DO 200 T=1.5*2，100.0/2.0，2.0 DO 5 M=100，0，-2

例

INTEGER FCH

READ *，M，N

K=MIN（M，N）

DO 10 I=1，K，1

IF（MOD（M，I）.EQ.0.AND.MOD（N，I）.EQ.0）FCH=I

10 CONTINUE

WRITE（*，100）M，‘和’，N，‘的最大公约数是：’，FCH

FORMAT（1X，I4，A，I4，A，I4）

END

4 循环嵌套

program main

implicit none

integer m, n, k

do 10 m = 1, 9

do 20 n = 1, m

write (*, 100) m, n ,m*n

20 continue

print *, ' '

10 continue

100 FORMAT (1x, I1, '*', I1, '=', I2, ' ', $)

End

由于FORMAT语句中使用了$符号，执行WRITE语句后将不会换行，当一行上的所有算式都输出完后（即内层循环结束）需要安排一个输出空符号语句，去掉该行上最后一个算式后的不换行格式5 FORMAT 语句

10 FORMAT（3I4）

输出3行，每个数据占4位

6 数组

6.1数组的说明

数组的说明应该包括以下几个方面的内容：

确定数组的名称；

确定数组元素的类型；

确定数组的结构(包括数组维数，每一维的取值范围等内容)

说明语句的形式有：

(1)类型说明语句：说明数组的类型和元素个数

类型标识符数组名1 (维说明1[，维说明2])[，数组名2]

(2)DIMENSION语句：只说明数组元素个数

DIMENSION 数组名1 (维说明1[，维说明2])[，数组名2]

其中“维说明”的形式：

维下界∶维上界 (或下标下界∶下标上界)

例如：

REAL A(1:10)，B(80:90)，C(-5:4)，NUM1(1:2,1:5)

INTEGER D(0:1,0:4)，NUM2(2:5)

DIMENSION S(3:5), M(1:10)

数组默认下标下界为1，例如

Integer A(1∶10)，等价于A(10)

数组说明语句必须出现在所有可执行语句以及DATA语句之前，例如

READ（*，*） N

DIMENSION S(3:5), M(1:10)

是错误的，两个语句顺序不对。

Read语句

当一个文件前面N行数据不需要时，可以用do循环过滤掉，例如

Dimension cpp(500,500)

Open (unit = 12, file = ‘data’, status = ‘old’)

Nn = 5

DO I = 1,4

READ (12,*)

ENDDO

DO

READ (12,*,END = 1000) CPP(NN,1:10)

WRITE(13, *) CPP(NN,3)

NN = NN + 1

Enddo

1000 close (12)

Read 在读取前面4行时，没有赋给任何变量，从第5行（NN）开始，每次读取数据后赋给数组CPP(NN，1:10)，然后将数组写进文件代号为13的文件。

6.2 利用隐含DO循环实现对一维数组元素的输入和输出

DIMENSION A(5) ！说明一维数组

A=10 ！给A的5个元素赋初值10

WRITE(*,100) （A（I），I=5，1，-1）！倒序输出A数组的5个元素的值 100 FORMAT(1X,5I4) 6.3 给数组赋初值

INTEGER A(2,2)

DATA（A(I,J),J=1,2）,I=1,2)/11，21，12，22/ 或者DATA A/11，22，33，44/

1.OPEN语句

OPEN语句用于把设备号与文件名连接起来，并且对文件的各项性质进行指定。它的一般形式为：OPEN([UNIT=]unit[,ACCESS=access][,ACTION=action][,BLANK=blanks][,BLOCKSIZE=blocksize][ ,CARRIAGECONTROL=carriagecontrol][,DELIM=delim][,ERR=err][,FILE=file][,FORM=form][,IOF OCUS=iofocus][,IOSTAT=iostat][,PAD=pad][,POSITION=position][,RECL=recl][,SHARE=share][ ,STATUS=status])

其中的各项参数的意义及取值如下：

1) UNIT：设备号说明。unit是大于或等于0的正整数，设备号说明是OPEN语句的第—项时可以省略“UNIT=”。

2) ACCESS：存取方式说明。access是字符串表达式：

APPEND 追加方式

SEQUENTIAL 顺序访问方式

DIRECT 直接访问方式

当省略此说明项时为顺序访问方式。

3) ACTION：描述文件的读写属性。action是字符串表达式：

READ 文件为只读方式打开

WRITE 文件为只写方式打开

READWRITE 文件为可读写方式打开

当省略此说明项时，文件打开顺序：READWRITE->READ->WRITE。

4) BLANK：说明数据格式输入字段中空格的含义。blank是字符串表达式：

NULL 空格忽略不计，相当于在格式描述符中的BN编辑符

ZERO 空格处理成数字0，相当于BZ编辑符

当省略此说明项时为ZERO。此说明只能用于格式输入。

5) BLOCKSIZE：指定以字节为单位的设备缓存的大小，默认值为一4字节整数。

6) CARRIAGECONTROL：指明处理文件中的第一个字符的方式，其值为字符串表达式：

Fortran 对第一个字符作一般的Fortran解释

LIST 指出在文件的每两个记录之间有—个空格

默认状态下，对于连接到打印机和显示器这样的设备，设置值为Fortran，

对于连接到文件的设备，设置值为LIST。当FORM被设成UNFORMATTED和

BINARY时，其值被忽略。

7) DELIM：指明分隔直接列表或格式化名称列表记录的方式，其值为字符串表达式：

APOSTROPHE 用单撇号(’)分隔

QUOTE 用双撇号(”)分隔

NONE 不用分隔符

如果在OPEN语句中设置了分隔符，则在文件中的单撇号和双撇号都是成对出现

的。

8) ERR：出错处理说明。其值是同一程序中的一条语句的标号，当OPEN语句执行出错时执行此语句。如果省略该项，则出错时给出出错信息并终止运行。

9) FILE：文件名。file是一字符串表达式，可以是空、合法的数据文件名字、设备名字或是作为内部文件的变量。在WinNT/9x中允许使用长度大于8的文件名和长度大于3的文件扩展名。省略此项时，编译器将自动产生一个文件名唯一的临时文件，这个临时文件将在结束运行或与文件连接的设备关闭后被删除掉。

10) FORM：记录格式说明。form是字符串表达式：

FORMATTED 记录按有格式存放。

UNFORMATTED 记录按无格式存放。

当省略此说明项时为：对顺序文件是有格式的；对直接文件是无格式的。

11) IOFUS：指出一个新Quickwin子窗口是否为活动窗口，其值为逻辑值。缺省值为真。

12) IOSTAT：出错状态说明。iostat是—个缺省长度为4的整形变量。当执行此OPEN语句时系统给变量赋值：

零没有发生错误

负数文件结尾

正数发生错误，其值视具体计算机系统而定

若省略该项则没有此功能。

13) PAD：从格式化文件中记录的数据少于要读取的数据时，是否用空格来填充没有从记录中读到数据的变量。pad是字符串表达式：

YES 填充(默认值)

NO 不填充

14) POSITION：指定打开顺序文件的访问位置，position是字符串表达式：

ASIA 已被连接的文件的访问位置是固定的，未被连接的文件的访问位置

是文件的开始处。

REWIND 把文件的访问位置定在文件的开始处(文件己存在)。

APPEND 把文件的访问位置定在文件的末尾处(文件己存在)。

对于一个新文件，文件的访问位置总是被定在文件的开始处。

15) RECL：记录长度(单位为字节)说明。recl是指定的正整型量或算术表达式，用来指定直接文件中的每条记录的字节数，或顺序文件中的记录的最大长度。

16) SHARE：指明当文件打开时是否实现文件的锁定。share是字符串表达式：

DENYRW 动态读写模式。不允许其他的进程打开这个文件。

DENYWR 动态写模式。不允许其他的进程以写的方式打开这个文件。

DENYRD 动态读模式。不允许其他的进程以读的方式打开这个文件。

DENYNONE 默认的非动态模式。允许其他的进程打开这个文件。

17) STATUS：文件状态说明。status是字符串表达式：

OLD 表示指定的文件是已经存在的老文件。这一状态一般用于读

操作，如果用于写操作则重写文件，原文件内容将被覆

盖。如果指定的文件并不存在，则系统将给出出错信息。

NEW 表示指定的文件尚不存在。执行OPEN语句时将在磁盘上建立

该文件并使其状态改变为OLD。NEW状态一般用于写操作。

如果指定的文件名已经存在将给出出错信息(有的系统

不给出信息而是把这个已经存在的文件冲掉使原来的内

容不复存在)。

SCRATCH 表示与设备号相连接的文件在关闭时将被自动删除。注意：

此状态不能与FILE说明共存，只能用于由计算机系统指

定的文件名，使该文件作为程序运行过程中的一个临时

性文件。

REPLACE 表示替换一个有相同名字的文件，如果没有同名的文件存在，

将产生一个新文件。

UNKNOWN 表示文件可以是已存在的或不存在的。系统打开文件状态的

次序为：OLO->NEW->创建新文件。STATUS的设置值只影

响磁盘文件，像键盘和显示器这样的设备将忽略这一设

置。

若省略该项时默认的状态为UNKNOWN

Makefile 基本上就是『目标』(target), 『关连』(dependencies) 和『动作』三者所组成的一连串规则。而 make 就会根据 Makefile 的规则来决定如何编译 (compile) 和连结 (link) 程式。实际上，make 可做的不只是编译和连结程式，例如 FreeBSD 的 port collection 中，Makefile 还可以做到自动下载原始程式套件，解压缩 (extract) ，修补(patch)，设定，然後编译，安装至系统中。

C++

Visual C++作为一种程序设计语言, 它同时也是一个集成开发工具, 提供了软件代码自动生成和可视化的资源编辑功能。在使用Visual C++开发应用程序的过程中, 系统为我们生成了大量的各种类型的文件, 在本节中将要详细介绍Visual C++中这些不同类型的文件分别起到什么样的作用, 在此基础上对Visual C++如何管理应用程序所用到的各种文件有一个全面的认识。

首先要介绍的是扩展名为dsw的文件类型, 这种类型的文件在VC中是级别最高的, 称为Workspace 文件。在VC中, 应用程序是以Project的形式存在的, Project文件以.dsp扩展名, 在Workspace文件中可以包含多个Project, 由Workspace文件对它们进行统一的协调和管理。

与dsw类型的Workspace文件相配合的一个重要的文件类型是以opt为扩展名的文件, 这个文件中包含的是在Workspace文件中要用到的本地计算机的有关配置信息, 所以这个文件不能在不同的计算机上共享, 当我们打开一个Workspace文件时, 如果系统找不到需要的opt类型文件, 就会自动地创建一个与之配合的包含本地计算机信息的opt文件。

上面提到Project文件的扩展名是dsp, 这个文件中存放的是一个特定的工程, 也就是特定的应用程序的有关信息, 每个工程都对应有一个dsp类型的文件。

以clw为扩展名的文件是用来存放应用程序中用到的类和资源的信息的, 这些信息是VC中的ClassWizard工具管理和使用类的信息来源。

对应每个应用程序有一个readme.txt文件, 这个文件中列出了应用程序中用到的所有的文件的信息, 打开并查看其中的内容就可以对应用程序的文件结构有一个基本的认识。

在应用程序中大量应用的是以h和cpp为扩展名的文件, 以h为扩展名的文件称为头文件。以cpp为扩展名的文件称为实现文件, 一般说来h为扩展名的文件与cpp为扩展名的文件是一一对应配合使用的, 在h为扩展名的文件中包含的主要是类的定义, 而在cpp为扩展名的文件中包含的主要是类成员函数的实现代码。

在应用程序中经常要使用一些位图、菜单之类的资源, VC中以rc为扩展名的文件称为资源文件, 其中包含了应用程序中用到的所有的windows资源, 要指出的一点是rc文件可以直接在VC集成环境中以可视化的方法进行编辑和修改。

最后要介绍的是以rc2为扩展名的文件, 它也是资源文件, 但这个文件中的资源不能在VC的集成环境下直接进行编辑和修改, 而是由我们自己根据需要手工地编辑这个文件。

对于以ico,bmp等为扩展名的文件是具体的资源, 产生这种资源的途径很多。使用rc资源文件的目的就是为了对程序中用到的大量的资源进行统一的管理。

1.left operand has type 'const char【4】

丢失符号”<<”。

例cout << "\nThe min value of the numbers: "x

应为cout << "\nThe min value of the numbers: "<

2.if (maxValue < value2);

if 语句之后不需要”;”

3.void min(int a, int b)

｛

int c；

return c；

｝

void定义的函数是无返回值的。return c；

4.忘记写类定义末尾的分号

例如

class Gradebook

｛

public:

void min(int a, int b)

｛

int c；

｝

｝；

5. error C3646: 'cout' : unknown override specifier函数定义没有{}

例如 class Gradebook

｛

public:

void min(int a, int b)

int c；

｝；

正解

class Gradebook

｛

public:

void min(int a, int b)

｛

int c；

｝

｝；

7. error C2589: 'void' : illegal token on right side of '::'

用类定义成员函数时，void，int等要放在最前面

例如

GradeBook:: void setTeacherName(string name1) 正解void GradeBook:: setTeacherName(string name1)