Πώς να διαβάσετε Χαρακτήρες σε FORTRAN

Πολύ πριν υπήρχε Microsoft Windows , προγραμματιστές υπολογιστών που χρησιμοποιείται μια γλώσσα που ονομάζεται FORTRAN για την επίλυση σύνθετων επιστημονικών και μηχανικών προβλημάτων . Ανάπτυξη αρχής γενομένης από το 1953 , αυτή η γλώσσα της γήρανσης μπορεί επίσης να εκτελέσει απλές εργασίες όπως η ανάγνωση και το χειρισμό χαρακτήρων . Μπορείτε να βρείτε αυτή την ικανότητα χρήσιμο όταν προτρέποντας τους χρήστες για αριθμητικό πληροφορίες ή διαβάζοντας συμβολοσειρές κειμένου από εξωτερικά αρχεία . Επειδή FORTRAN χειρίζεται λειτουργίες εισόδου αυτόματα , το μόνο που χρειάζεται να εισάγετε το δικαίωμα εντολές για την εκτέλεση αυτών των καθηκόντων . Οδηγίες
Διαβάστε από Keyboard
Η

1 Ανοίξτε ένα από FORTRAN αρχεία σας και προσθέστε τον ακόλουθο κώδικα μετά τη δήλωση του προγράμματός σας :

χαρακτήρα * 4 xcharacter * 2 y

Αυτός ο κώδικας ορίζει δύο μεταβλητές χαρακτήρα του οποίου τα μήκη είναι 4 και 2 , αντίστοιχα . Χρησιμοποιήστε αυτή τη μορφή κατά τον καθορισμό των μεταβλητών χαρακτήρα 2

Προσθέστε τον κωδικό που εμφανίζεται παρακάτω μετά από αυτές τις δύο δηλώσεις μεταβλητών : .

Print * , "Παρακαλώ εισάγετε μια λέξη με τέσσερα γράμματα και δύο χαρακτήρων λέξη " διαβάσει ( * 1 ) x , y1 μορφή ( A4 , A2 )

Η δήλωση ανάγνωσης διαβάζει τα δεδομένα στο x και y μεταβλητές . Περιέχει επίσης δύο παραμέτρους που περιβάλλεται από παρενθέσεις. Η πρώτη παράμετρος , * , λέει FORTRAN να δεχτεί είσοδο από το πληκτρολόγιο . Η δεύτερη παράμετρος , 1 , είναι ένας αριθμός μορφή. Επισημαίνει μια ετικέτα μπροστά από μια δήλωση που περιέχει οδηγίες μορφοποίησης . Η δήλωση αυτή είναι η δήλωση μορφή που εμφανίζεται μετά την ανακοίνωση ανάγνωσης . Η δήλωση περιέχει format Α4 και Α2 . Το γράμμα A είναι ένας κώδικας μορφή που λέει FORTRAN για την αντιμετώπιση των δεδομένων ως συμβολοσειρά κειμένου . Κάθε κωδικός μορφοποίηση στη λίστα παραμέτρων αντιστοιχεί σε μια μεταβλητή στην κατάσταση ανάγνωσης . Σε αυτό το παράδειγμα , ο υπολογιστής διαβάζει τις πρώτες τέσσερις χαρακτήρες που πληκτρολογείτε και να τις αποθηκεύσει στη μεταβλητή x . Στη συνέχεια, αποθηκεύει τα επόμενα δύο χαρακτήρες που πληκτρολογείτε στη μεταβλητή y . Η δήλωση εκτύπωσης εμφανίζει μια συμβολοσειρά κειμένου που βοηθά τους χρήστες να καταλάβουν τι θα θέλατε να εισέλθουν .
Εικόνων 3

Αποθηκεύστε το πρόγραμμα και εκτελέστε το όπως κάνετε συνήθως . Όταν ένα παράθυρο εντολών ανοίγει, πληκτρολογήστε " aaaabb " - χωρίς τα εισαγωγικά - στο παράθυρο και πατήστε το πλήκτρο " Enter". Ο κώδικας διαβάζει τους χαρακτήρες και να εκχωρήσετε " aaaa " με τη μεταβλητή x και " ββ " με η μεταβλητή y .
εικόνων Διαβάστε από αρχείο
Η

4 Ανοίξτε το Notepad και να επικολλήσετε το κείμενο που εμφανίζεται πιο κάτω σε ένα νέο έγγραφο και να το αποθηκεύσετε .

dddd ee
5

Ανοίξτε ένα άλλο Fortran αρχείο και να επικολλήσετε αυτές τις δηλώσεις μεταβλητών κάτω από τη δήλωση του προγράμματος :

χαρακτήρα * 4 xcharacter * 2 y
Η 6

Προσθέστε την ακόλουθη κώδικα μετά τον κωδικό που εμφανίζεται στο προηγούμενο βήμα :

ανοιχτή ( " ; " 2 , FILE = ) read ( 2 , 3 ) x , y3 μορφή ( A4 , 1x , Α2 ) κοντά ( 2 )

Αντικαταστήστε το ερωτηματικό με το όνομα του αρχείου κειμένου που αποθηκεύονται . Η ανοικτή δήλωση ανοίγει το αρχείο και εκχωρεί τον αριθμό μιας μονάδας σε αυτό. Αυτός ο αριθμός είναι 2 . Η διαβάσετε τη δήλωση φαίνεται διαφορετικά αυτή τη φορά . Δεύτερη παράμετρος της , 3 , αναφέρεται στην ανακοίνωση μορφή κάτω από αυτό , αλλά η πρώτη παράμετρος αναφέρεται σε 2 , ο αριθμός αρχείων που συνδέονται με την ανοικτή δήλωση σας . Επειδή αυτοί οι αριθμοί αγώνα , η δήλωση ανάγνωσης θα διαβάσει τα δεδομένα από το αρχείο και να το αποθηκεύσετε στο x και y μεταβλητές .
Η

7 Αποθηκεύστε το πρόγραμμα και να το εκτελέσετε . Το πρόγραμμα διαβάζει τους χαρακτήρες από το αρχείο σας και να τα αποθηκεύει στις x και y μεταβλητές .
Η
εικόνων