από Stokos » 12 Νοέμ 2008, 22:39
εφόσον δηλώσεις τη μεταβλητή σου ως integer αυτό δε θα πρέπει να σε απασχολεί καθόλου
1ος τρόπος
implicit none;
integer input;
write(*,*) "Dwse enan ari8mo";
read(*,*) input;
Αν δώσεις π.χ. 7,9568 η μεταβλητή input θα έχει τιμή 7.
2ος τρόπος
Να χρησιμοποιήσεις την input ως real αλλά να βάλεις στη read κατάλληλο format ώστε να διαβάζει μόνο το ακέραιο μέρος π.χ. format(Ι5).
3ος τρόπος
Nα διαβάσεις τη μεταβλητή σου με format * και να τη κάνεις cast σε integer, π.χ. για C είναι input = (int) input, στη fortran θα είναι κάτι παρόμοιο το οποίο δε το έχω ψάξει...
Έχει και άλλους πολλούς τρόπους. Ο καλύτερος για μένα είναι ο πρώτος.