U nastavku moje prve poruke je i kod koji radi. Kao tutorial za Fortran 90, može da posluže primeri iz
http://www.matf.bg.ac.yu/~ndjurdjevac/FORTRAN%2090.pdf
Petlja koja ide 1..N u Fortranu se piše:
Code:
do i = 1, N
write(*,*) i
end do
... a evo i kako da napravimo da ide N, 2N, 3N,... N*N
Code:
do i = 1, N
write(*,*) i*N
end do
... i kako da ide 0, N, 2N,... (N-1)*N
Code:
do i = 1, N
write(*,*) (i-1)*N
end do
Za gornji zadatak nam trebaju dve petlje zato što će jedna da broji ono +1, +2, +3,... a druga za svako +nešto da broji 0*N, 1*N, 2*N,...
Code:
do i = 1, N
do j = 1, N
write(*,*) i
write(*,*) (j-1)*N
! zbir je tacno ono sto nam treba
write(*,*) (j-1)*N + i
end do
end do
Ostatak koda iz prve poruke učitava N, alocira nizove na veličinu N, učitava ulazni niz brojeva i dodeljuje vrednosti... Uz elementarno znanje Fortrana trebalo bi da to bude jasno kako radi. Nadam se da je ova poruka od pomoći za razumevanje ovog i svih sličnih problema.
http://sr.libreoffice.org — slobodan kancelarijski paket, obrada teksta, tablice,
prezentacije, legalno bez troškova licenciranja