Fortran导引.docVIP

Fortran导引 Fortran入门快速指南 Fortran学习的一些建议 2006-8-6 相信大家都对C语言有一定的了解，其实Fortran跟C相差不是很多。 我把自己认为比较合理快速学习Fortran的方法说下。 学习Fortran，会遇到Fortran77Fortran90等等，两者差别不大，建议学习Fortran90或更 高，更加自由些（仅对一般用而言，其他优势可能体现不出来），对自己以后学习他 的程序包也会有好处。 大家一般只是为了编程为了计算而学Fortran，而不是为了学习Fortran而学Fortran，所以 我的建议是学习Fortran不要像学C那样拿一本很详细的教材从头至尾学下来，一个大家都 有不错的C语言基础，而且也没有太多的精力去专门研究这些，倒不如看些简易的教材（我 会附上），掌握基本语句之后直接从看最简单的程序开始。这样，很快就会体会到Fortra n的格式，可以开始自己写程序了。学习的顺序我建议如下： 1、 编一些仅含输入输出的程序，然后可以尝试把输入输出同文件结合起来（从文件里读 数据、写数据）； 2、 然后可以学条件判断、循环语句，通过几个实例也可以很快掌握； 3、 再往后就是写子程序，就是程序的调用，相信那个时候，看了我的第一个例子（PROG RAM A）就应该能写出简单的含函数调用的程序，到了这里，基本上可以算告一段落，可以 进行结构上复杂的程序的编写； 4、 最后，可以学一下多个程序的编译甚至是多种语言程序的混编（如既有C又有Fortran 的多个程序一起编译）。多个程序的编译我不并不熟悉，就留给siriusbobo同志来解说吧 :-) 在编程中遇到困难然后再去查找资料和用法不失为一种好的方法，不必刻意去求学全。 当然，有足够时间和精力的同学强烈建议好好看教材，不必急于求成，有一个好的基础总 是一件很好的事。 Fortran相比C的优势的话在于它丰富的资源，C的优势可能是更加简洁，编译效率更高。但 对于我的平时使用来说，这两者的优势、劣势都体现不出来，自己的感觉是Fortran更接近 平时的科学语言，比较严谨些，更容易读懂不出错，比较符合习惯，变量、函数的声明上 也比C更方便灵活，以外函数的使用为例： ****************************************************************************** PROGRAM A real z read *,z call f(z) y=z print *,y end subroutine f(x) x=x**2 return end ****************************************************************************** 只需要加一个subroutine程序段，主函数即可用call调用，当然也可以写多个子程序 ，其中一个子程序也可以通过call来调用其他子程序。 就一般学习而言，除了子程序的编写，另外一个用得比较多的是文件的读写操作，读用 read,写用write，如下： ****************************************************************************** PROGRAM B real x open (1,file=in.dat,status=unknown) open (2,file=out.dat,status=unknown) read (1,100) x 100 format (1e12.7) close(1) write (2,200) x 200 format (1e15.8) close(2) end ****************************************************************************** 如果用*的话，就为默认形式，更具体的可以查看帮助或有关资料，比较好的方法是随时 做一个test程序，用来检测所学或所想。 对于上程序，出现的100,200是语句标号，这些标号为方便语句的跳转而出现，可以实 现循环、条件控制等，但也为了使程序结构化而不推荐使用，用goto语句和语句标号实现 语句的跳转如下： ****************************************************************************** PROGRAM C integer n real z n=0 read *,z 1 call f(z) y=z n=n+1 if (n10) goto 1 print *,y end subroutine f(x) x=x**