Kodutõõ
       
13. Järgmises FORTRAN programmis peate leidma vead,
selgitage oma vastuseid.

Seitsme reaalarvu liitmine (kasutati alamprogrammi)

 implicit none
 real v(7)
 integer sum,n
 data v/1.3,4.6,5.0,7.1,8.9,3.5/
 open(10,file="test6.in")
 n=5
 call sumv(n,v,sum)
 print*,"sum=",sum
 stop
 end
 subroutine sumv(v,sum,n)
 real v,n
 integer sum
 sum=0.
 do i=1,n
 sum=sum+v(i)
 enddo
 return
 end
 
5. Mille jaoks kasutatakse järgmised FORTRAN operaatorid?
Selgitage oma vastuseid.

a) implicit none 
b) implicit real*8 (a-h,o-z)
c) implicit integer (a-h)

3. Mida teevad järgmised FORTRANi operaatorid? Selgitage oma vastuseid.

a) real*4 a, c12(20)
b) integer abc(5),d123
c) complex*16 a(12)
d) character*10 a(5)
e) integer,allocatable:: abc(:,:,:)