Fortran90 课件 03.pptVIP

* * Intrinsic functions 作业：Google的作用？ 工具的作用？ 学生需要什么样的知识？ 如何衡量教育的价值？ 数学公式说明也行，Fortran代码也行。 * * Stop可以出现在程序的任何地方。 * * Write在转换程序输出的时候比较方便。 * * * 9行，最严谨的写法。输出位置使用默认值，不限定输出格式。 Fortran90以双引号封装字符串，Fortran77标准为单引号，但有的编译器接受双引号。 * * * * * * * * * * * * * * * * * * * * Fortran 90 语言初步 南开大学数学学院 向 兵 2008-09-17 Format : fixed format Fixed Format ( .f or .for) 1位： C/c/* ( comment ) 1-5位： space or NO. ( code ) 6位： 非0 ( continue last line) 7-72位： code 73-### ： nonuse Format: free format Free format 没有位的概念　 ！：　　comment 132 字符/每行 行号放在行首 ： continue last line 输出 write(*,*) “Hello” * ：预先设定的输出设备 * ：不特别设定的输出格式 最严谨的写法（见下图L9-L11） print * , “Hello” 屏幕输出命令 没有指定输出格式 输入_1 read(*,*) a 1. * ：预先设定的输出设备 2. * ：不特别设定的输出格式 3. 最严谨的写法（见下图 L15-L17） 输入_2 输入字符串无需加入双引号，以空格或逗号作为间隔符： 问题： 输入Happy Birthday在下面命令的结果 read( * , * ) a, b read(*, * ) a 如何解决？ Data Type Integer: 1 byte : -128 ~ + 127 2 bytes: -32,768 ~ +32,767 4 bytes: -2,147,483,648 ~ + 2,147,483,647 Real: floating-point numbers) Single-precision mode(4 bytes): ±1.18*10E-38 ~ ±3.40*10E38 Double Precision(8 bytes) ±2.23*10E-308 ~ ±1.79*10E308 Data Type Complex a + bi , a/b : Real ( single or double precison) Character: strings Logical 1: True 0: False INTEGER Round : a = 3/2 ? a = ? a = ? ? a = ? Length: 4 bytes 2 bytes 1 bytes Real : part 1 Single precision:有效位数为6-7位 a = 1000000. + 0.1 ? a = 1000000. Double precision :有效位数为15位 科学记号表示法 ： 10,000,000,000 = 1E10 or 1D10 0.0000000001 = 1E-10 or 1D-10 常数部分请加上.0 real a a = 1.5 + 3.0 / 2. ? a = ? a = 1.5 + 3/2 ? a = ? Real : part 2 双精度(REAL*8)，常数请加上d0 a = 1/3 ? a = 0.0000000000000000 a = 1. /3. ? a = 0.3333333432674408 a = 1D0/3D0 ? a = 0.3333333333333333 “D”不分大小写 F90: a = 1.0_4 ? kind = 4 a = 1.0_8 ? kind = 8 Character 长度超过一个字节时，需指定长度：len 值的设定： “Hello” or ‘Hello’ or else see *.txt string( 1: 4 ) = “ Good” string( 5: 5) = “ “ string(6: ) = “morning” // !连接操作符　 a