请帮我更改此 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）。