VECTOR

 !Program name: VECTOR

!Building a 5-dimensional vector and sum of its elements

  REAL*8 X(5),sum

  Print *,'Input the five scalar elements of the 5-D vector:'

  Read *,X

  sum=0.

  do 1 I=1,5

     sum=sum+X(I)

1 continue

  Print *,'The sum of the five elements of 5-D vector is: ',sum

  stop

  end

Comentários

Postagens mais visitadas deste blog

RECURSIVE

HYDROGEN-RADIAL

RUNGE-KUTTA