填充Fortran 2D数组

我想知道如何填充一个相当大的二维数组。我只想用X或一个值来填写，然后打印出来

到目前为止：

CHARACTER Grid(20,20)

print *, Grid

---

这应该很简单。那么以下内容如何：

program simple
   CHARACTER(len=1) :: Grid(20,20)
   Grid = "x"
   Print *, Grid
end program simple

---

你可以测试一下。请注意，您必须事先知道/确定字符的长度，否则必须使用可分配字符数组。如果希望每个元素具有不同的字符长度，则必须创建可分配字符的可分配数组，这在Fortran 2003以后的版本中是可能的。

Welcome。请为您的代码使用提供的格式化功能，不要添加不必要的噪音。查看我对您的问题所做的编辑。适当地格式化代码非常重要，尤其是对于较大的示例。