fortra 第4章.ppt

Fortran 95 程序设计 第四章 输入输出及声明 § 4.1 简单的输出 程序结构： 程序开始PROGRAM MAINMAIN是自定义名称……. 主程序代码WRITE(*,*) “HELLO”…… 程序终止STOP此行可省略 主程序代码结束ENDEND( FORTRAN 77)END PROGRAMEND PROGRAM MAINWRITE命令 Write(*,*) “就这么简单“ Write(unit=*, fmt=*) “就这么简单“ Write(6, *) “string”！严谨一些的写法 Write(unit=6, fmt=*) “STRING”!最严谨的写法 WRITE(*,*) “HELLO”, “FRIENDS!” WRITE(*,*) “MY NAME IS “”PETER”.” WRITE(*,*) ‘That’’s right’注意： 1）每执行完一个write命令后，会自动换行 2）Fortran 77只能使用单引号封装的字符串 3）引号封装的字符串中含有同类的引号要连用才能输出PRINT命令print *, “hello” 比write少了一个*号，只能在屏幕输出 § 4-2 声明 声明：在程序代码中，向编译器要求预留存放数据（变量和常量）的内存空间 变量、常量的命名原则 名称以使用英文字母为原则，可以内含下划线或数字，但是前缀必须是英文字母 名称的长度，在77标准中至少支持6个字符长，90标准中至少支持31个字符长。 变量名最好不要和Fortran的执行命令同名，也不能和主程序的名称或是前面声明过的变量同名。 程序中辨认变量时，不会区分它的大小写。 例：x1, va_2, 3p, program, print主程序名为PX 中的变量名不能有PX或px § 4-2-1 整数类型的声明注意：整型变量只保存整数，实数的小数点后数据会自动省略 变量名的隐含约定 Fortran标准规定：凡是以字母I, J, K, L, M, N六个字母开头的变量，未经声明默认为整型，其他字母开头的变量为实型。未经声明的变量 IMAX=6.6IMAX=6 变量类型声明后，隐含约定不作用，但是声明仅在本程序单元内有效。即变量声明具有局域性（局部变量或全局变量） § 4-2-2 实数（浮点数 real) 声明形式： Real a！默认单精度（4 bytes)单精度： real(kind=4) a!fortran 90 添加real*4a!fortran 77旧有real(4)a!fortran 77旧有 双精度： real(kind=8) a!fortran 90 添加real*8a!fortran 77旧有real(8)a!fortran 77旧有 § 4-2-3 复数（COMPLEX) 复数由实部和虚部组成，为浮点数保存 Complex a!默认单精度 Complex(kind=4) a!单精度， fortran90添加 Complex(kind=8) a!双精度， fortran90添加 Complex*4a!单精度，fortran 77旧有 Complex(4)a!单精度，fortran 77旧有 Complex*8a!双精度，fortran 77旧有 Complex(8)a!双精度，fortran 77旧有 复数变量的赋值： a=(x,y)!a=x+yi § 4-2-4字符及字符串(character) 字符类型是用来保存一个字符或一长串字符符所组成的“字符串”时所使用的类型，每个字符占用一个字节。 Character a!单个字符 Character(len=10) b!fortran 90 添加 Character(10)c!fortran 77 旧有 Character*10d!fortran 77 旧有 Character*(10)e!fortran 77 旧有 字符和字符串变量赋值：单引号或双引号封装，内装内容属于数据，区分英语字母的大小写 A=“Hello”!fortran 90添加 B=‘Hello’!fortran 77 只能用单引号封装 C=“That’s right.”!双引号封装的字符串，字符串中任含单引号 D=‘That’’s right’!单引号封装的字符串中，每个单引号要连用两次 E=“That‘s “”right””.”!双引号封装的字符串中，每个双引号要连用两次字符串中引号的用法在输出语句中规则相同 字符变量的操作：★局部操作 字符变量的操作：★两个字符串连接 // 注意字符串的长度 部分常用字符串函数 § 4-2-5 逻辑变量（logical) 声明（通常占用空间大小由编译器选择）：LOGICAL a 赋值：