Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  last
Language: FORTRAN
Code:
     program hello1
        real:: rr, del
        real,dimension(3):: ds, s0, s1
        ds(1)=2.0
        ds(2)=3.0
        ds(3)=4.0
     s0(1)=1.0
        s0(2)=5.0
        s0(3)=3.0
        rr=sum(ds*ds)
        print *,rr
     s1=s0+ds*del
     print *,s1
        read *, rr
     end program hello1         
Comments: