Fortran关于默认数组读取的认识

本文摘要（由AI生成）：

Fortran中数组是重要的数据结构，用于存储同类型数据。Fortran默认采用列优先存储，与常见的行优先不同。在处理数组时，需要正确理解和控制数据的读取和赋值顺序。文章中的例子展示了如何通过隐式循环指定行优先顺序，确保数据正确填充到数组中。这种显式控制读取顺序的方法提高了代码的可读性和准确性，避免了潜在错误。因此，在使用Fortran处理数组时，应理解和正确应用列优先与行优先的概念。

有这样一组数据：

15 36 85 96 67 45 14 14

28 23 45 56 45 45 34 12

42 65 56 67 43 12 45 60

73 85 96 93 82 65 16 29

    这里想将其写入到一个A(4,8)的数组里面。

    首先定义           

            integer ::  A(4,8)

    然后进行读取   

           read(11,*)    A

    那么输出会是怎样的呢？是这样排列的。

 a(11) a(21) a(31) a(41) a(12) a(22) a(32) a(42)

a(13) a(23) a(33) a(43) a(14) a(24) a(34) a(44)

a(15) a(25) a(35) a(45) a(16) a(26) a(36) a(46)

a(17) a(27) a(37) a(47) a(18) a(28) a(38) a(48)

    结果并不是如我们所期望，如果不留意，很容易出错，为了确保安全，可以在读取的时候这样写：

             read(11,*) ( (A(i,j),j=1,8),i=1,4 )                     

            ！这是一个隐循环

   那么结果就是自己期望的那样：

 a(11) a(12) a(13) a(14) a(15) a(16) a(17) a(18)

a(21) a(22) a(23) a(24) a(25) a(26) a(27) a(28)

a(31) a(32) a(33) a(34) a(35) a(36) a(37) a(38)

a(41) a(42) a(43) a(44) a(45) a(46) a(47) a(48)