Το e-steki είναι μια από τις μεγαλύτερες ελληνικές διαδικτυακές κοινότητες με 66,096 εγγεγραμμένα μέλη και 2,388,093 μηνύματα σε 74,654 θέματα. Αυτή τη στιγμή μαζί με εσάς απολαμβάνουν το e-steki άλλα

Καλώς ήρθατε στο e-steki!

Εγγραφή Βοήθεια

Πρόγραμμα ΦΟΡΤΡΑΝ 77

xristos_metal

Νεοφερμένος

Το avatar του χρήστη xristos_metal
Ο xristos_metal αυτή τη στιγμή δεν είναι συνδεδεμένος Είναι 31 ετών . Έχει γράψει 4 μηνύματα.

O xristos_metal έγραψε στις 12:59, 04-09-09:

#1
Καλησπερα ειναι το πρωτο μου ποστ και θα ηθελα μια βοηθεια ωσον αφορα το παρακατω προγραμμα.Οι προτασεις ειναι σωστες απλα δε μπορω να τις βαλω σε σειρα.Αν καποιος μπορει να βοηθησει θα το εκτιμουσα.

PROGRAM TEST
INTEGER T
DOUBLE PRECISION A(N)
WRITE*,T,A(T)
READ(5,1) (A(J),J=1,N)
PARAMETER (N=100)
(T)=A(T)+2.0
DO 10 T=1,N
CONTINUE
END

Σημείωση: Το μήνυμα αυτό γράφτηκε πάνω από 8 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.

0 Δεν μπορείτε να αξιολογήσετε αρνητικά το μήνυμα αυτόΔεν μπορείτε να αξιολογήσετε θετικά το μήνυμα αυτό
Παράθεση

kalypso (lily allen)

Διακεκριμένο μέλος

Το avatar του χρήστη kalypso
H lily allen αυτή τη στιγμή δεν είναι συνδεδεμένη. Είναι 28 ετών , επαγγέλεται Μηχανολόγος μηχανικός και μας γράφει απο Μονακό (Ευρώπη). Έχει γράψει 1,764 μηνύματα.

H kalypso έγραψε στις 21:09, 04-09-09:

#2
PROGRAM TEST
DOUBLE PRECISION A(N)
INTEGER T
PARAMETER (N=100)

READ(5,1) (A(J),J=1,N)

DO 10 T=1,N
(T)=A(T)+2.0
WRITE*,T,A(T)
CONTINUE

END


'Ημουν έτοιμη να πω ότι λείπει ένα enddo αλλά το τσέκαρα στο Google και στην έκδοση αυτή της FORTRAN το Continue παίρνει τη θέση του..

Τα υπόλοιπα πιστεύω είναι σωστά..

Σημείωση: Το μήνυμα αυτό γράφτηκε πάνω από 8 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.

2 Δεν μπορείτε να αξιολογήσετε αρνητικά το μήνυμα αυτόΔεν μπορείτε να αξιολογήσετε θετικά το μήνυμα αυτό
Παράθεση

xristos_metal

Νεοφερμένος

Το avatar του χρήστη xristos_metal
Ο xristos_metal αυτή τη στιγμή δεν είναι συνδεδεμένος Είναι 31 ετών . Έχει γράψει 4 μηνύματα.

O xristos_metal έγραψε στις 21:12, 04-09-09:

#3
Ευχαριστω!!!!
Διαβασα και αλλο ενα θρεντ που ειχε κατι προγραμματακια φορτραν,γιαυτο τα ειχα βαλει με εκεινη τη σειρα.

Σημείωση: Το μήνυμα αυτό γράφτηκε πάνω από 8 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.

0 Δεν μπορείτε να αξιολογήσετε αρνητικά το μήνυμα αυτόΔεν μπορείτε να αξιολογήσετε θετικά το μήνυμα αυτό
Παράθεση

kalypso (lily allen)

Διακεκριμένο μέλος

Το avatar του χρήστη kalypso
H lily allen αυτή τη στιγμή δεν είναι συνδεδεμένη. Είναι 28 ετών , επαγγέλεται Μηχανολόγος μηχανικός και μας γράφει απο Μονακό (Ευρώπη). Έχει γράψει 1,764 μηνύματα.

H kalypso έγραψε στις 21:14, 04-09-09:

#4
Τίποτα βρε συ..

Αν θες περαιτέρω εξήγηση σε κάτι, πες

Σημείωση: Το μήνυμα αυτό γράφτηκε πάνω από 8 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.

1 Δεν μπορείτε να αξιολογήσετε αρνητικά το μήνυμα αυτόΔεν μπορείτε να αξιολογήσετε θετικά το μήνυμα αυτό
Παράθεση

xristos_metal

Νεοφερμένος

Το avatar του χρήστη xristos_metal
Ο xristos_metal αυτή τη στιγμή δεν είναι συνδεδεμένος Είναι 31 ετών . Έχει γράψει 4 μηνύματα.

O xristos_metal έγραψε στις 21:16, 04-09-09:

#5
Ναι κανονικα τα write kai read δε θα επρεπε να ειναι πιο ψηλα?

Σημείωση: Το μήνυμα αυτό γράφτηκε πάνω από 8 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.

0 Δεν μπορείτε να αξιολογήσετε αρνητικά το μήνυμα αυτόΔεν μπορείτε να αξιολογήσετε θετικά το μήνυμα αυτό
Παράθεση

kalypso (lily allen)

Διακεκριμένο μέλος

Το avatar του χρήστη kalypso
H lily allen αυτή τη στιγμή δεν είναι συνδεδεμένη. Είναι 28 ετών , επαγγέλεται Μηχανολόγος μηχανικός και μας γράφει απο Μονακό (Ευρώπη). Έχει γράψει 1,764 μηνύματα.

H kalypso έγραψε στις 21:30, 04-09-09:

#6
Τσου..
Λοιπόν, πρόσεξε τι σημαίνουν όλα αυτά, για να καταλάβεις γιατί τα έβαλα με αυτή τη σειρά.

PROGRAM TEST--> το βάζεις πάντα ως αρχή στο πρόγραμμα, είναι η λέξη πρόγραμμα ακολουθούμενη από την ονομασία του προγράμματος που εδώ είναι η λέξη TEST


DOUBLE PRECISION A(N)--> Το βάζεις για να δηλώσεις πως οι μεταβλητές σου είναι διπλής ακριβείας
INTEGER T--> δηλώνεις τη μεταβλητή Τ ως ακέραια
PARAMETER (N=100)--> πάει πάντα μετά το integer, και είναι για να δηλώσεις θέσεις σε πίνακα

READ(5,1) (A(J),J=1,N)--->δίνεις μία μία τις τιμές που πιάνουν από μία θέση το καθένα στον πίνακα (θέσεις από 1 έως Ν). Το Read σημαίνει διάβασε- μέσω αυτής της εντολής δίνεις τα δεδομένα στο πρόγραμμα.

DO 10 T=1,N
(T)=A(T)+2.0
WRITE*,T,A(T)
CONTINUE

όλο το από πάνω, από το do έως το continue είναι μία ολοκληρωμένη εντολή επανάληψης, η οποία εκτελεί μία ενέργεια με τα δεδομένα που έχει πάρει από το read. Εδώ παίρνει κάθε φορά το δεδομένο που βρίσκεται στη θέση Τ του πίνακα (το δεδομένο της 1ης θέσης, μετά της 2ης κλπ. μέχρι να φτάσει στο δεδομένο της Ν θέσης) και του προσθέτει 2.0
Μετά με την εντολή write, το εμφανίζει στην οθόνη σου ή το εκτυπώνει.

END---> αυτό μπαίνει για να δηλώσει το τέλος του προγράμματος




Καλά τα λέω Ζωρζ; ;p

Σημείωση: Το μήνυμα αυτό γράφτηκε πάνω από 8 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.

4 Δεν μπορείτε να αξιολογήσετε αρνητικά το μήνυμα αυτόΔεν μπορείτε να αξιολογήσετε θετικά το μήνυμα αυτό
Παράθεση

xristos_metal

Νεοφερμένος

Το avatar του χρήστη xristos_metal
Ο xristos_metal αυτή τη στιγμή δεν είναι συνδεδεμένος Είναι 31 ετών . Έχει γράψει 4 μηνύματα.

O xristos_metal έγραψε στις 21:54, 04-09-09:

#7
Τι να πω με καλυψες απολυτα.....Καλυψω το λεει και το ονομα σου χαχα.Μου φαινεται θα παρω δεκαρακι στο μαθημα .Χιλια ευχαριστω !

Σημείωση: Το μήνυμα αυτό γράφτηκε πάνω από 8 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.

3 Δεν μπορείτε να αξιολογήσετε αρνητικά το μήνυμα αυτόΔεν μπορείτε να αξιολογήσετε θετικά το μήνυμα αυτό
Παράθεση
Απάντηση στο θέμα

Χρήστες

  • Τα παρακάτω 0 μέλη και 1 επισκέπτες διαβάζουν μαζί με εσάς αυτό το θέμα.
     
  • (View-All Tα παρακάτω 0 μέλη διάβασαν αυτό το θέμα τις τελευταίες 30 μέρες:
    Μέχρι και αυτή την στιγμή δεν έχει δει το θέμα κάποιο ορατό μέλος

Βρείτε παρόμοια

  • Παρόμοια Θέματα
    • Ιός-πρόγραμμα - Από Dark_kronos
      Το θέμα έχει λάβει 8 απαντήσεις και βρίσκεται στην κατηγορία Software.
      Το τελευταίο του μήνυμα δημοσιεύτηκε 23-04-13 στις 13:39.
    • Πρόγραμμα για το PC! - Από Amanda!!
      Το θέμα έχει λάβει 3 απαντήσεις και βρίσκεται στην κατηγορία Εξωσχολικές Δραστηριότητες.
      Το τελευταίο του μήνυμα δημοσιεύτηκε 26-07-10 στις 12:29.
    • Πρόγραμμα - Από SoZi
      Το θέμα έχει λάβει 43 απαντήσεις και βρίσκεται στην κατηγορία Γ' Λυκείου & Απόφοιτοι.
      Το τελευταίο του μήνυμα δημοσιεύτηκε 17-08-09 στις 00:02.
    • Μαθηματικά προγραμμα - Από _ann_
      Το θέμα έχει λάβει 16 απαντήσεις και βρίσκεται στην κατηγορία Θετικών Σπουδών.
      Το τελευταίο του μήνυμα δημοσιεύτηκε 16-07-09 στις 03:07.
  • Προηγούμενο Θέμα Επόμενο Θέμα

Μοιραστείτε το

...με ένα φίλο

...με πολλούς φίλους