Question

fortran 给数组部分元素赋相同的值

为什么？





Answer 1

(/../)这种方式是矢量的方式，而且这种方式是数字的构造方式，前提：

The values of the components must have the same type and type parameters
(kind and length).

类型和长度必须相同才可以。 因此你上面的赋值出问题；不过可以修改如下：

    program main
    integer, dimension(10) :: A    
    A(1:10:2) = 1 ! 1,3,5,7,9 = 1
    A((/1,2,5,7/)) = 1  ! 1,2,5,7 = 1
    A(1:10) = 1 ! 1~10 = 1
    print *, A(1:10)
    end program main

Answer 2

A(1:10) = 1

就行了