Kodutõõ
       
10. Järgmises Fortrani programmis peate leidma vead:
Selgitage oma vastuseid.

Kahe arvu liitmine:
 
 implicit none
 print ("a="$)
 read a
 print ("b="$)
 read b
 c=a+b
 print *,a,+,b,=,c
 stop
 end
 
14. Järgmises FORTRAN programmis peate leidma vead,
selgitage oma vastuseid.

Integraali arvutamine standardse alamprogrammi quanc8 abil:

 implicit none
 real a,b,relerr,abserr,flag 
 integer errest
 a=0.
 b=1.
 abserr=0.0
 relerr=1.e-6
 quanc8(func, b, a, abserr, relerr, result, errest, nofun, flag)
 print *,result*4., errest
 stop
 end
 function func(x)
 func=sqrt(abs(1.-x*x))
 return
 end
 
7. Mida teeb järgmine Fortrani kood?
Kirjutage kommentaare igale operaatorile?

implicit none
real a,b,c
namelist /aaa/ a,b,c
open(10,file="input.dat")
read (10,aaa)
print aaa
stop
end

ja input.dat faili sisu:

&aaa
b=2
c=3
a=6
/