Fortran的點點滴滴 批量生成檔案

設要生成4000個檔案，檔名為aa1-aa4000，如何寫迴圈生成檔案,而不用寫4000次write命令呢?!這時可以用內部檔案來實現該功能：

program main

character(len=80) :: filename,form
integer :: i
do i=1,4000
select case (i)
case (1:9)
write(form,'(i1)') i
case (10:99)
write(form,'(i2)') i
case (100:999)
write(form,'(i3)') i
case (1000:9999)
write(form,'(i4)') i
end select
write(filename,*) "aa",trim(form),".txt"
open(10,file=filename)
write(10,*) i
close(10)
end do
end program

上面程式中字元變數form、filename充當了內部檔案，用來儲存臨時內容，通過格式化輸出，可以對其內容靈活控制。

Fortran的點點滴滴 陣列

陣列 array 是一組型別完全相同 且用單個名字來引用的變數或常量，這組陣列占用計算機記憶體中的連續若干位置，陣列中的單個元素稱為陣列元素。fortran中陣列是乙個非常有用的運算元據工具，本文將簡略介紹陣列的一些知識。陣列使用之前，它包含的元素型別和個數必須用型別宣告語句來向編譯機宣告。陣列的宣...

Fortran的點點滴滴 開場白

fortran語言作為一種數值計算常用語言，其最大特性是接近數學公式的自然描述，其在計算機裡具有很高的執行效率，且易學，語法嚴謹。在用fortran的這麼多年，天天的積累，漸漸攢起了不少自己的經驗 把它們寫下來給大家分享，尤其是分享給我生活的另一半，將會是一件很開心的事情。program main ...

acm 點點滴滴

qsort排序方法 六種qsort排序方法 本文中排序都是採用的從小到大排序 一 對int型別陣列排序 int num 100 sample int cmp const void a const void b qsort num,100,sizeof num 0 cmp 二 對char型別陣列排序 ...