fortran90总结第二章(部分) 林晓彤主编

fortran90总结第二章(部分) 林晓彤主编

ID:12097778

大小:103.50 KB

页数:7页

时间:2018-07-15

fortran90总结第二章(部分) 林晓彤主编_第1页
fortran90总结第二章(部分) 林晓彤主编_第2页
fortran90总结第二章(部分) 林晓彤主编_第3页
fortran90总结第二章(部分) 林晓彤主编_第4页
fortran90总结第二章(部分) 林晓彤主编_第5页
资源描述:

《fortran90总结第二章(部分) 林晓彤主编》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、第一章:类型说明(种别说明),属性说明1,属性说明2……Integer(kind=2),dimension(1:14),…….2.1程序programheight_of_yaoimplicitnoneinteger::height,height_feet!声明整形变量real::h_inch,height_inches!声明实型变量integer,parameter::foot_inch=12!整型符号常量real,parameter::inch_cm=2.54!实型符号常量height=226!身高厘 米数h_inch=height/inch_cm!折合英尺print*,'Theheight

2、is',h_inch,'inches.'height_feet=int(h_inch/foot_inch)!身高英尺数height_inches=h_inch-height_feet*foot_inch!身高英寸数print*,'Theheightis',height_feet,'feet',&height_inches,'inches.'endprogramheight_of_yao!在不同处理器中,表示同样精度和范围的树枝,所采取的种别参数是不一样的。2.2.1整形数据programtestimplicitnoneinteger::forty_two,sixty_three,max_byt

3、eforty_two=B'101010'!二进制赋值sixty_three=O"77"!十进制赋值max_byte=Z'ff'!十六进制赋值 print*,'forty_two=',forty_two,'sixty_three=',sixty_three,'max_byte=',ma x_byteendprogramtest'kind'的妙用:kind的数值依赖于处理器。programselect_kindimplicitnoneinteger,parameter::i=selected_int_kind(6)print*,6_i!程序输出‘6’print*,kind(2_i),i!程序输出‘

4、4,4’print*,kind(0),kind(0.0)!输出的都是默认的种别,是一个整数。其括号里不同是因为不同类型数的种别,kind永远是实行的。endprogramselect_kindprogramreal_kindimplicitnonereal::jinteger,parameter::i=selected_real_kind(3,4)!提供三位精度以及 10000位的范围,!!!!!!kind类型必须是一个正型变量。print*,iprint*,6.0_iendprogramprogramtestimplicitnoneprint*,1_'i"am',.true._2!注意字符型

5、的变量的kind写法。true的暑促结果只是Tpintt*,kind('A')!缺省的字符型种别参数。endprogramtestprogramtestimplicitnonecharacter(len=5)::strl='abcdefg'print*,strlprint*,1_'i"am&hehe'endprogramtest2.2.6type的妙用:programtestimplicitnonetypeperson!type的定义是在变量说明之前进行的。character(len=8)::namelogical::marryreal::salaryendtypepersontype(per

6、son)::boyboy=person("lxp",.false.,300000.50)print*,boyprint*,boy%name!注意引用子部分的方法。endprogramtest数据在机器内的存储方式不同:整形数据存储处理快,而实型的存储处理慢,但是整形无误差,故尽量用实型。每一个复型变量输入一对括号,括号内先写实数部,再写虚数部。programtestimplicitnonereal::a,bread'(i2)',a,bread(*,'(i2)')a,bread*,a,b!正在输入中/表示停止输入,而编辑福可以重复利用。endprogramtestprogramtestimpli

7、citnonereal::a,binteger::mread'(i2)',a,bread(*,'(i2)')a,bread*,a,bwrite(unit=*,fmt='(2f8.2)',iostat=m)a,b!*表示默认的机子。Fmt一般省略。endprogramtest编辑符的总结:read与print都有’()’的形式。Write得一定是在括号里面有‘’。编辑符:Iw[.m]W表示字段宽度,

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。