請幫我更改此 FORTRAN 程式 50

Fortran 是一種源自“Formula Translation”縮寫的程式語言。

它是世界上最早的高階計算機程式語言，廣泛應用於科學和工程計算領域。 FORTRAN 語言以其獨特的功能在數值、科學和工程計算中發揮著重要作用。

隨著FORTRAN語言版本的不斷更新和變化，語言不相容的問題日益凸顯，語言標準化工作被提上日程。

1962 年 5 月：美國標準化協會 （ANSI） 開始研究 FORTRAN 語言的標準化。

1966年：ANSI正式發布了兩個標準文字：美國國家標準Fortran（ANSI）和美國國家標準Basic Fortran（ANSI），前者相當於Fortran，後者相當於Fortran。

Basic FORTRAN是美國國家標準FORTRAN的乙個子集，實現了語言的向後相容，初步解決了語言伴奏的問題。

在主程式中，沒有對 SE 型別的描述。

解決辦法：在主程式標頭 integer（8） ：se<> 中新增一行

這將編譯並通過。

但是需要指出的是，se=10*k**m 的取值遠遠超出了 integer（8） 的範圍，結果是乙個負數，實際上是乙個整數溢位。

使用對數方法，我們可以得到 se= *10 7520388406這是乙個超過 75.2 億位的大整數。

希望對你有所幫助！

你的 fortran 程式有兩個問題，1len=11 寫成 len-11

2weekday 寫成週末

完整過程如下（有關更改，請參閱注釋）。

program weekday_weekend

implicit none

character(len=11)::c_day

character(len=11)::c_type !這裡將 （len-11） 更改為 （len=11）。

write(*,enter the name of the day:'

read(*,c_day

select case(c_day)

case('monday','tuesday','wednesday','thursday','friday')

c_type='weekday' !在這裡，我們將週末更改為工作日

case('saturday','sunday')

c_type='weekend'

case default

c_type='invalid day'

end select

write(*,day type=',c_type

end program weekday_weekend

第 14 章 基本數值演算法示例。

常用的數值積分演算法373

Rectangle 方法 374

梯形法 374

方法376 數值積分計算子程式378的應用

簡單線性代數問題 380

消除法求解線性方程組380

消元法求解線性方程組384

非線性函式求解387

迭代方法 387

牛頓迭代法 388

二分法 390

弦截斷 392

非線性函式求解子程式的應用 394

常微分方程的基本解 400

插補和擬合 406

拉格朗日多項式插值 407

牛頓正向插值 409 臨時檔案的應用 414 主要程式 414

隨機數生成子程式 415

質數拾取和檔案重寫子程式415

質數判斷子程式 416

排序演算法 429

鼓泡法 429

選擇排序方法 433

快速排序方法 436 ......

這通常不是由不同的計算機引起的，而是由不同的編譯器和作業系統引起的。

每個編譯器都有不同級別的語法檢查，並且分配堆疊的方式也不同。

此錯誤是堆疊溢位，通常發生在具有大量迴圈的大型程式中，尤其是對於遞迴函式呼叫或具有大型陣列的應用程式。

有兩種方法可以解決它：

1.減少堆疊使用量。 這主要是通過將固定大小的陣列更改為可分配的陣列來解決的。

2.增加堆疊的大小。 這是對編譯器的操作。 您需要檢視您正在使用的編譯器的手冊（幫助文件）以確定要執行的操作。

以 Compaq Visual Fortran 為例：

選擇專案 => 設定 => 鏈結 => 類別：輸出 =>

stack allocations

reserve：在此處輸入新值（預設值為 1m，如果需要 10m，則為 10000000）。

如果您使用其他編譯器，也可以向我詢問您的編譯器品牌和版本。 我看看我是否熟悉它。

堆疊溢位是指堆疊溢位錯誤，通俗地稱為記憶體不足。 對於不同的計算機，它可能有所不同。 如果怕麻煩，可以將原始碼中的堆疊調整到更大的大小，然後重新編譯exe程式。

你好！ 您的安裝目錄可能空間不足，因此您可以在其他安裝目錄中嘗試

真是寫得一團糟，真的不像一兩句話就能告訴你。 鑑於您的情況，這裡有一些基本建議。

1.永遠不要想一口就胖。 許多初學者犯的乙個錯誤是試圖一口氣從頭到尾寫，這是乙個非常錯誤的程式設計習慣。 程式設計師再優秀，寫程式也是按部就班地寫出來的，因為程式設計遵循嚴格的邏輯，所以你需要確保你寫好第乙個模組或步驟，然後再寫第二個模組，而不是一口氣寫出來，這樣會花費很多額外的時間來找出錯誤的原因。

2. 仔細看看錯誤，除非你是女孩。 如果不看錯誤內容，通常會發生在女生身上，看來我多年的經驗真的無能為力。 但是大多數錯誤都是英文的，如果你沒有耐心閱讀它們，你就無法除錯程式。

3. 你誤解了 fortran 的子程式和功能。 Fortran 與 C 語言家族不同，Fortran 的子程式是子程式，自定義函式是函式，兩者的功能完全不同。 子例程本身不能返回值，也不能為其賦值。

從你的程式的角度來看，你想用函式而不是子例程，具體用法請參考資訊和示例。

4.你的程式中有大量重複定義的變數，這意味著你沒有耐心去檢查你寫的程式。 請記住，耐心是最基本的品質。

5.外部不是你的使用方式，在大多數情況下你不能使用它，所以不要再使用它了。

這意味著檔案正在被讀取，但檔案已結束。

直觀地說，您的程式需要乙個包含 100 行的資料檔案，但您只有 90 行資料，並且當讀取第 91 行時會觸發此錯誤。

有兩種可能性，但它們是相對的

輸入檔案中沒有足夠的資料。

您在迴圈中讀取檔案，但迴圈控制錯誤，您想讀取 90 行，最終讀取了 90 多行。 （例如，Do i = 1，n 你認為 n=90，但實際上由於一些錯誤 n=91）。