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

Seitsme reaalarvu liitmine:

 real v(7),n
 integer sum,i
 data v/1.2,2.6,3,4.1,5.4/
 n=10
 sum=0.
 do I = 1,n,-1
 sum=sum+v(i)
 enddo
 print*,"sum=",sum
 stop
 end
 
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(:,:,:)

11. Järgmises Fortrani programmis peate leidma vead.
Selgitage oma vastuseid.

Kahe numbri summeerimine:

real a,b,c
open(file="test5.in")
open(file="test5.out")
read(10,*) a,b
c=a+b
print *,"a+b=",c
write(11,*) c
stop
end

       
       
NB! Vastuseid ootan meiliga hiljemalt 27.09.2026