Question

我正在尝试为n * n矩阵编写一个非常简单的代码来生成切片矩阵。但是，当使用Geany和Gfortran运行时，我得到了错误的切片矩阵。

代码是：

make

结束程序mat_slice

输出是的 0 4 0 5

但是，当我在Jdoodle上运行相同的代码时，我会得到正确答案。

输出

1 4 2 5

任何想法都将受到赞赏。

Answer 1

您的值i和j在首次使用时未定义

mask(i,:) = .false. 
mask(:,j) = .false.

因此您的程序无效。

可能使用值0，程序访问数组uout of bounds。始终首先使用所有调试检查和警告编译程序。在gfortran中使用-g -fbacktrace -Wall -fcheck=all作为开始。有关详细信息，请参阅手册。