
- Κώδικας: Επιλογή όλων
IMPLICIT REAL*8 (A-H,O-Z)
Αυτή η εντολή σημαίνει:
1) Όλες οι μεταβλητές είναι διπλής ακρίβειας (=DOUBLE PRECISION), δηλαδή αποθηκεύονται σε καταχωρητές 8 δυαδικών ψηφίων.
2) Όλες οι μεταβλητές των οποίων τα ονόματα ξεκινούν από τους (λατινικούς) χαρακτήρες A έως H και O έως Z είναι πραγματικές (REAL). Αφήνεις τις (I,J,K,L,M,N) εκτός, διότι, από παλιά, οι μεταβλητές των οποίων τα ονόματα ξεκινούσαν από (I,J,K,L,M,N) αναγνωρίζονταν αυτόματα (και υποχρεωτικά) από τον μεταγλωττιστή ως ακέραιες.
Έτσι, σε οποιοδήποτε σημείο του κώδικά σου χρειάζεσαι μια νέα μεταβλητή, μπορείς να την ορίσεις, π.χ.:
- Κώδικας: Επιλογή όλων
A=0.0
Ο μεταγλωττιστής θα καταλάβει ότι πρόκειται για πραγματικό αριθμό, αφού ξεκινά από το γράμμα "Α".
Ισοδύναμη της "IMPLICIT REAL*8 (A-H, O-Z)" είναι η ακόλουθη:
- Κώδικας: Επιλογή όλων
IMPLICIT DOUBLEPRECISION (A-H,O-Z)
Κάποιοι τύποι μεταβλητών της FORTRAN που μου έρχονται αυτή τη στιμή στο μυαλό είναι οι ακόλουθοι (δεν θυμάμαι να ξέρω και άλλους...!

REAL*4 (SINGLE PRECISION)
REAL*8 (DOUBLE PRECISION)
INTEGER (ΑΚΕΡΑΙΟΣ, ΒΛΕΠΕ Π.Χ. ΜΕΤΑΒΛΗΤΗ "ICOUNT" ΠΑΡΑΚΑΤΩ)
CHARACTER (ΧΑΡΑΚΤΗΡΑΣ, ΒΛΕΠΕ Π.Χ. ΜΕΤΑΒΛΗΤΗ "CHΝΑΜΕ" ΠΑΡΑΚΑΤΩ)
LOGICAL (ΛΟΓΙΚΗ - ΛΑΜΒΑΝΕΙ ΤΙΣ ΤΙΜΕΣ TRUE/FALSE, ΒΛΕΠΕ Π.Χ. ΜΕΤΑΒΛΗΤΗ "ANSWER" ΠΑΡΑΚΑΤΩ)
- Κώδικας: Επιλογή όλων
A=0.0
ICOUNT=10
ANSWER=.TRUE.
CHNAME='LOULIS_KOUKLENTES'
Με εκτίμηση,
Θοδωρής._
_________________________
Υ.Γ.: Από ποιά γλώσσα προγραμματισμού προέρχονται οι λέξεις "div" και "mod" ;


