fortran 数组下标从0还是1开始？

Fortran语言中，数组的下标是从1开始的，这与许多其他编程语言（如C、Python或Java）将数组下标从0开始的习惯不同。这种从1开始的下标命名方式源于Fortran的历史，当时的记录卡片和编程语言是从1开始编号的。

以下是一个Fortran代码示例，展示了如何声明一个数组并使用从1开始的下标：

program array_example
    implicit none
    integer, dimension(5) :: numbers
    numbers(1) = 10
    numbers(2) = 20
    numbers(3) = 30
    numbers(4) = 40
    numbers(5) = 50
    print*, numbers(1)  ! 输出 10
    print*, numbers(2)  ! 输出 20
    print*, numbers(3)  ! 输出 30
    print*, numbers(4)  ! 输出 40
    print*, numbers(5)  ! 输出 50
end program array_example

在这个例子中，numbers 是一个整型数组，它包含5个元素。我们通过下标1到5分别给数组元素赋值，并打印出它们的值。这里的下标从1到5，而不是从0到4。

参考：百度AI