2007年01月_iteye_12577

Fortran 的計時程式

cpp 代码 ! main() implicit none real t1, t2 integer*4 no, sum, i pause t1= secnds(0.0) pause t2= secnds(t1) print *, '...

2007-01-31 12:53:31 361

Fortran 所提供的迴圈結構

asdf當 no 太大的時候， sum= 1 + 2 + ... + no會出現錯誤的答案，integer*2 2- bytes 的整數範圍是 -32768 ... +327674- bytes 的整數範圍是 -2147483648 ... +2147484647以下的示範程式，介紹三種回圈結構，如此就夠用了cpp 代码 ! main() ...

2007-01-31 11:26:15 103

Fortran 的選擇式結構

這是 Fortran 90 所提供的選擇性的程式結構，很重要。當係數 a,b,c= 1, 3, 1 的時候，驗算結果會產生誤差，這就是浮點數的運算，一定會產生誤差。如何正確處理誤差，是一個很重要的學問。...

2007-01-31 10:51:10 62

我的作業平台

因為會牽涉到程式執行速度的比較問題，所以，在這裡先列出來我目前的作業平台情況給大家參考。有興趣的朋友，可以互相觀摩比較。Windows XP sp2, Intel Celeron M 1.5GHz504 MB...

2007-01-31 09:14:39 78

integer 到底是 2 or 4 個 bytes?

cpp 代码 ! --- main() --- implicit none ! integer 到底是 2 or 4 個 bytes? ! Ans: > 32767, 所以是 4 個 bytes integer no no= 10 do while (no .GT. ...

2007-01-30 18:17:05 154

Fortran 90 的主程式單元

cpp 代码 ! --- main() --- implicit none print *, 'Hello World at 06:06' end ! ----------------------------------------------- 其實，只要ㄧ行end就是...

2007-01-30 18:11:05 63

Fortran 90 的段落式的注解

cpp 代码 ! main() begin implicit none print *, 'Hello World at 1201' ! print *, 'Hello World at 1202' print *, 'Hello World at 1203' ...

2007-01-30 12:13:06 790

Compaq Visual Fortran 6.6

Compaq Visual Fortran 6.6 所提供的 'Hello, world!'cpp 代码 ! VF30.f90 ! ! FUNCTIONS: ! VF30 - Entry point of console application. ! ! Example of...

2007-01-30 10:49:09 1400

sjgau