Ενημερώση κάθε 15 δευτερόλεπτα
Κώδικας: Επιλογή όλων
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)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" ;
