Pazi sada ovako, niti sam ikada radio u fortranu, niti znam koji fortran koristis (ako ih uopste ima vise verzija), niti znam da li su novije verzije unazad kompatibilne, ali posto ne verujem da ces lako dobiti odgovor na pitanje o fortranu, ovo je nesto sto sam uspeo da ti na brzinu sklepam uz pomoc neke knjige "Uvod u fortran" iz '85 godine
Code:
DIMENSION NIZ(10)
DO 10 I=1,10
READ 100, NIZ(I)
10 CONTINUE
MIN=NIZ(1)
MAX=NIZ(1)
DO 20 I=2,10
IF (MIN.GT.NIZ(I)) MIN = NIZ (I)
IF (MAX.LT.NIZ(I)) MAX = NIZ (I)
20 CONTINUE
PRINT 110, MIN
PRINT 110, MAX
100 FORMAT(I4)
110 FORMAT(1X,I8)
999 STOP
END
Znaci, ne garantujem da radi, nemam na cemu da probam, ali valjda moze da ti bar malo pomogne za pocetak

I ne pitaj me kako funkcionise ono FORMAT(1X,I

, nisam skontao, ali oni u celoj knjizi tako pisu, pa valjda tako treba