Fortran语言F77和F90的区别+F90简明教程

另一点关于声明的不同是Fortran有"等价声明"：
integer a,b
equivalence(a,b)
使得a,b使用同一块内存。这样可以节省内存；有时可精简代码。如：equivalence(很长名 字的变量如三维数组的某个元素，a)，之后使用a来编写程序就简洁多了。
2、基本输入输出
输入：read(*,*) a
4、Fortran的基本程序结构
先看一看所谓的"Hello Fortran"程序。
program main
!程序开始，main是program的名字，完全自定义
write(*,*) "Hello" !主程序
stop
!终止程序
end [program[main]] !end用于封装代码，表示代码编写完毕。[ ]中的内容可省略， 下同。
Fortran 90：自由格式（free format）， 扩展名：.f90
（1）以"!"引导注释；
（2）每行可132字符，行代码放在每行最前面；
（3）以&续行，放在该行末或下行初。
以下都是讨论Fortran 90。
3、Fortran的一些特点，和C的一些不同
其实很多，在下面涉及具体方面时可以看到。这里只是大致提一些。
ห้องสมุดไป่ตู้
Page 3 of 19
登录 注册
2015-04-18
Fortran语言F77和F90的区别＋F90简明教程
1、数据类型，声明及赋初值首 页
阅览室
馆友
（1）integer： 短整型kind=2, 长整型kind=4
我的图书馆
integer([kind=]2) :: a=3
如果声明成integer:: a，则默认为长整型。
三、流程控制
1、运算符
（1）逻辑运算符
== /= > >= < <=
!Fortran 90用法
.EQ. .NE. .GT. .GE. .LT. .LE. !Fortran 77用法
/content/11/1008/23/7562873_154470765.shtml
（1）不分大小写
（2）每句末尾不必要写分号
（3）程序代码命令间的空格没有意义
（4）不像C，Fortran不使用{ }
（5）数据类型多出了复数和逻辑判断类型。比如复数类型
complex :: a !声明复数的方法。复数显然方便了科学计算，满足了工程方面需求
a=(1.0,2.0) ! a=1+i
最新文章
(1) 基本 ：
if(逻辑判断式) then
……
end if
如果then后面只有一句，可写为
if(逻辑判断式) ……
!then和end if可省略
(2) 多重判断：
if（条件1） then
……
else if（条件2）then …… else if （条件3）then ……
2、Fortran的主要版本及差别
按其发展历史，Fortran编译器的版本其实很多。现在在广泛使用的是Fortran 77和 Fortran90。Fortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了F77编 程的版面格式，所以编程时推荐使用F90。鉴于很多现成的程序只有F77版本，有必要知道F77 的一些基本常识，至少保证能够看懂F77程序。以下是F77和F90的一些格式上的区别。
complex([kind=]4) b （4）character character([len=]10) c !len为最大长度 （5）logical logical*2 :: d=.ture. (等价于logical(2)::d=.ture.) （6）自定义类型type：类似于C中的struct Fortran 77中给变量赋初值常用DATA命令，可同时给多个变量赋初值
!"::" 在声明并同时赋初值时必须要写上；类型名后面有形容词时也必须保留::；其他情况可 略去
!所谓形容词，可以看一下这个。比如声明常数 real，parameter :: pi=3.1415926 。parameter就是形容词。 （2）real：单精度kind=4（默认），双精度kind=8
real([kind=]8) :: a=3.0 还有指数的形式，如1E10为单精度，1D10为双精度 （3）complex 单精度和双精度
(2011-08-25 11:47:59) 转载
标签： 分类： Fortran
it
一、概述
1、名词解释
Fortran=Formula Translator/Translation，一看就知道有什么特色了：可以把 接近数学语言的文本翻译成机械语言。的确，从一开始，IBM设计的时候就是为了方便数值计算 和科学数据处理。设计强大的数组操作就是为了实现这一目标。Fortran奠定了高级语言发展 的基础。现在Fortran在土木工程和机械领域应用很广。
data a,b,string /1, 2.0, 'fortran'/
与C不同的是，Fortran中变量不声明也能使用,即有默认类型（跟implicit命令有关）。按 照默认的定，以i,j,k,l,m,n开头的变量被定义为integer,其余为real。取消该设置需在程 序声明部分之前implicit none。彭国伦建议一般都使用该语句。
!cycle 相当于C里的continue
end if
! Compute area. The ** means "raise to a power."
area = 2 * pi * (radius**2 + radius*height)
! 指数运算比C方便
! Write the input variables (radius, height)
Fortran 77： 固定格式（fixed format），程序代码扩展名：.f或.for
（1）若某行以C,c或*开头，则该行被当成注释；
（2）每行前六个字符不能写程序代码，可空着，或者1~5字符以数字表明行代码（用作格式化 输入出等）；7~72为程序代码编写区；73往后被忽略；
（3）太长的话可以续行，所续行的第六个字符必须是"0"以外的任何字符。
!键盘输入。isotat的值用判断输入成
! If radius and height could not be read from input,
/content/11/1008/23/7562873_154470765.shtml
Page 2 of 19
登录 注册
! and output (area) to the screen.
write (*,'(1x,a7,f6.2,5x,a7,f6.2,5x,a5,f6.2)') & !"&"表示续行。这里还显示了格式化输出
'radius=',radius,'height=',height,'area=',area
yn = ' ' yn_loop: do
万能在线查询（值得收藏）
安卓智能手机操作说明
世界上最不能将就的事情就是结婚，你...
教你炒面秘诀，以后终于不用天天吃泡... 最感动的一句话，送给我爱的人
五十岁的男人和女人
【奇闻异录】?奇闻异事500件(46)
更多>>
/content/11/1008/23/7562873_154470765.shtml
Fortran语言F77和F90的区别＋F90简明教程
首页
阅览室
馆友
我的图书馆
搜文章 找馆友
Page 1 of 19
登录 注册
Fortran语言F77和F90的区别＋F90简明教程
收藏人：北极闲人 2011-10-08 | 阅：4099 转：28 | 来源
| 分享
Fortran语言F77和F90的区别＋F90简明教程
2015-04-18
Fortran语言F77和F90的区别＋F90简明教程
（6）多出了乘幂运算（**）首。页乘幂除了整阅数览还室可以是实馆数友形式。如开我方的，图开书立馆方
a=4.0**0.5，a=8.0**(1.0/3.0)。
（7）数组有一些整体操作的功能；可以方便的对部分元素进行操作
（8）有些情况下可以声明大小待定的数组，很实用的功能
end do yn_loop
!结束内嵌do循环
end do interactive_loop
end program cylinder
Fortran程序的主要结构就是这样了。一般还会有些module的部分在主函数前，函数在主函数 后。
二、数据类型及基本输入输出
/content/11/1008/23/7562873_154470765.shtml
艺术极品*犀角雕 上 犀角雕精品 二 红酒瓶塞的创意 废物利用红酒瓶木塞制... 自制“醋蛋液”的神奇功效 牛人组装家用太阳能发电站全过程(转) ... 一张图告诉你夫妻怎样成为一辈子的情人
更多
热门文章
赚钱的5道铁律，不是每个人都懂 裸女美姿
朱子治家格言
33款家居隐身术，探秘隐形门里的世界！ 【创意面食】烙饼做法专辑
2015-04-18
Fortran语言F77和F90的区别＋F90简明教程
首页
阅览室
! then cycle through the loop.
馆友
我的图书馆
if (ierr /= 0) then
write(*,*) 'Error, invalid input.'