χημεια4λαιφ
Νεοφερμένος
Ο χημεια4λαιφ αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής. Έχει γράψει 94 μηνύματα.
03-02-19
21:36
do while ABS((3/i)*x**i)>=h
s=s+(3/i)*x**i)
i=i+1 αυτο;;;; ειμαι αχτηστος στην πληροφορικη δεν εχω το σκεπτικο για να γινω καλος
με enddo sto telos
s=s+(3/i)*x**i)
i=i+1 αυτο;;;; ειμαι αχτηστος στην πληροφορικη δεν εχω το σκεπτικο για να γινω καλος
do while ABS((3/i)*x**i)>=h
s=s+(3/i)*x**i)
i=i+1 αυτο;;;; ειμαι αχτηστος στην πληροφορικη δεν εχω το σκεπτικο για να γινω καλος
με enddo sto telos
Σημείωση: Το μήνυμα αυτό γράφτηκε 5 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
χημεια4λαιφ
Νεοφερμένος
Ο χημεια4λαιφ αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής. Έχει γράψει 94 μηνύματα.
03-02-19
21:11
Εμένα με μπερδεύει η απάντηση του @johnny
Η υπόδειξη λέει ότι η άθροιση σταματά όταν η απόλυτη τιμή του όρου που προστίθεται στο άθροισμα είναι μικρότερη από h, δηλαδή όταν
το abs(3/ι*(x^ι)) < h
Αυτό που λέει ο @johnny (μόλις δυο διαδοχικά αθροίσματα έχουν διαφορά μικρότερη από το h το σταματάς) από που βγαίνει;
Άρα η λύση ειναι:
1) Mια συνάρτηση που παίρνει ως είσοδο την τιμή του x και την ακρίβεια h.
2) Μέσα στη συνάρτηση ορίζουμε και μηδενίζουμε την τιμή του Ν, καθώς και το άθροισμα (sum)
3) Μετά βάζουμε μια while που ελέγχει ότι για όσο abs(3/ι*(x^ι)) >= h κάνουμε τον υπολογισμο sum = sum + 3/i*(x^i) και αυξάνουμε την τιμή του Ν κατά 1
4) Έπειτα επιστρέφουμε ως έξοδο το Ν και το sum μέσα σε ένα πίνακα ή άλλη δομή δεδομένων.
Το N δεν κατάλαβα τι ρόλο παίζει.... Δλδ θα κάνω do i=1,1000000
If abs(3/i*x^i) then sum=sum+(3/i*x^i)
Else exit και μετά τι;
Σημείωση: Το μήνυμα αυτό γράφτηκε 5 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
χημεια4λαιφ
Νεοφερμένος
Ο χημεια4λαιφ αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής. Έχει γράψει 94 μηνύματα.
03-02-19
11:47
Απορία στη πληροφορική fortranf90
Πως λύνεται αυτό?
Πως λύνεται αυτό?
Σημείωση: Το μήνυμα αυτό γράφτηκε 5 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.