Ορίστε τι θέλετε να κάνετε . Μας δίνεται το πρόβλημα της επίλυσης ενός + b = c . Εμείς τώρα θα γράψω ένα πρόγραμμα FORTRAN για την επίλυση αυτής της εξίσωσης . 2
Αρχίστε δηλώνοντας το όνομά σας προγράμματα , "PROGRAM SimpleAddition . " Η δεύτερη γραμμή είναι , " ΠΡΟΚΥΠΤΟΝ ΚΑΝΕΝΑ . "
Εικόνων 3
Δήλωση μεταβλητών σας . Στην περίπτωση αυτή , θα ήταν , " REAL :: a, b, c . "
Η 4
Διαβάστε στα δεδομένα . Ο τρόπος για να γίνει αυτό είναι "WRITE ( * , * ) ' A , B παρακαλώ: " και στη συνέχεια "READ ( * , * ) a, b . " Η WRITE θα εμφανίσει το αίτημα του χρήστη για την εισαγωγή δεδομένων και η ΔΙΑΒΑΣΤΕ μετακινεί τα δεδομένα για τις μεταβλητές a και b .
5
Υπολογίστε τα δεδομένα χρησιμοποιώντας την ακόλουθη δήλωση , "c = ( a + b ) . "
Η 6
Εμφάνιση των αποτελεσμάτων με αυτή τη δήλωση , " WRITE ( * , * ) ' το άθροισμα είναι " c . "
Η 7
Τελειώστε το πρόγραμμά σας με το λέξεις , "ΤΕΛΟΣ ΠΡΟΓΡΑΜΜΑΤΟΣ SimpleAddition " έτσι ώστε FORTRAN ξέρει ότι είναι στο τέλος .
8
Εκτελέστε το πρόγραμμα . Το "Write" δήλωση εμφανίζει ένα μήνυμα , "Παρακαλώ εισάγετε Α και Β : " και περιμένει από το χρήστη να εισάγει δεδομένα thier . Θα εκτελέσει την "Ανάγνωση " δήλωση , μετακινώντας τα στοιχεία για τις μεταβλητές a και b . FORTRAN τότε θα πάμε στο επόμενο βήμα που είναι να συνοψίσω a και b .
Η 9
Εξετάστε το αποτέλεσμα . Υποθέτοντας ότι έχετε θέσει στις τιμές 50 και 75 , τα αποτελέσματα θα πρέπει να μοιάζει κάπως έτσι , " Α, Β Παρακαλούμε : 50 , 75 . " « Το ποσό είναι 125 . " Συγχαρητήρια , έχετε ολοκληρώσει ένα πρόγραμμα FORTRAN .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα