musicrain1
Εκκολαπτόμενο μέλος
Ο Φάνης αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής. Έχει γράψει 218 μηνύματα.
26-05-09
20:06
Καλό το παράδειγμα σου μόνο μια παρατήρηση. Η εντολή ΓΙΑ...ΑΠΟ...ΜΕΧΡΙ δεν χρειάζεται "επανάλαβε". Η ΟΣΟ είναι που θέλει το επανάλαβε. Τίποτα σημαντικό λάθος βιασύνης μάλλον απλά το επισημαίνω.
Σωστός, μου ξέφυγε:no1:!
Σημείωση: Το μήνυμα αυτό γράφτηκε 15 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
musicrain1
Εκκολαπτόμενο μέλος
Ο Φάνης αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής. Έχει γράψει 218 μηνύματα.
26-05-09
16:35
Δες ένα παράδειγμα σε μονοδιάστατο πίνακα Α[20]
Code:
Αλγόριθμος ΜΟ_μεγ_ελαχ
αθρ <- Α[1] !Αυτός είναι ο αθροιστής σου
μεγ <- Α[1] !Εδώ θα καταχωρείται το μέγιστο
ελαχ <- Α[1] !Και εδώ το ελάχιστο
Για i από 2 μέχρι 20 επανάλαβε
αθρ <- αθρ + Α[i] !Προσθέτει τα στοιχεία του πίνακα
Αν μεγ < Α[i] τότε !Συγκρίνει το καταχωρημένο ως μέγιστο με τα στοιχεία του Α
μεγ <- Α[i]
Τέλος_Αν
Αν ελαχ > Α[i] τότε
ελαχ < - Α[i]
Τέλος_Αν
Τέλος_επανάληψης
μέσος_όρος <- αρθ/20
Τέλος ΜΟ_μεγ_ελαχ
Σημείωση: Το μήνυμα αυτό γράφτηκε 15 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
musicrain1
Εκκολαπτόμενο μέλος
Ο Φάνης αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής. Έχει γράψει 218 μηνύματα.
25-05-09
21:39
Η 1)
ΠΡΟΓΡΑΜΜΑ ΕΡΓΑΣΙΑ
ΜΕΤΑΒΛΗΤΕΣ:
ΠΡΑΓΜΑΤΙΚΕΣ: ΟΝ[100],ΩΡΕΣ[100,6],ΑΠΟΔ[100],πληρ_καν_ωρ,πληρ_υπερ_ωρ
ΑΚΕΡΑΙΕΣ: ωρ,, ωρ_εργ, i, j, δεικτης_αποντων
ΑΡΧΗ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 100 ΕΠΑΝΑΛΑΒΕ
ΓΡΑΨΕ 'ΔΩΣΕ ΟΝΟΜΑ ΕΡΓΑΖΟΜΕΝΟΥ'
ΔΙΑΒΑΣΕ ΟΝ
ΤΕΛΟΣ ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 100 ΕΠΑΝΑΛΑΒΕ
j <- 1
ωρ <- 0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε ώρες εργασίας του, ΟΝ, 'τη μέρα', j,'0 αν απουσίαζε΄
ΔΙΑΒΑΣΕ ΩΡΕΣ [i,j]
ωρ <- ωρ + ΩΡΕΣ[i,j]
j <- j+1
ΜΕΧΡΙΣ_ΟΤΟΥ j=6 Η ωρ>=12
ΤΕΛΟΣ ΕΠΑΝΑΛΗΨΗΣ
πληρ_καν_ωρ <- 0
πληρ_υπερ_ωρ <- 0
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 100
ωρ_εργ <- 0
ΓΙΑ j ΑΠΟ 1 ΕΩς 6
ωρ_εργ <- ωρ_εργ + ΩΡΕΣ[i,j]
ΑΝ ωρ_εργ=0 ΤΟΤΕ
ΑΠΟΔ <-0
ΑΛΛΙΩΣ_ΑΝ ωρ_εργ <=8 ΤΟΤΕ
ΑΠΟΔ <- ωρ_εργ*7
πληρ_καν_ωρ <- ΑΠΟΔ + πληρ_καν_ωρ
ΑΛΛΙΩΣ
ΑΠΟΔ <- ωρ_εργ*7 + (ωρ_εργ-8)*10
πληρ_υπερ_ωρ <- πληρ_υπερ_ωρ + (ωρ_εργ-8)*10
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 100
ΓΡΑΨΕ ΟΝ, ΑΠΟΔ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ πληρ_καν_ωρ ,πληρ_υπερ_ωρ
ΓΡΑΨΕ 'Λίστα απόντων'
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 100
δεικτης_αποντων <-0
ΓΙΑ j ΑΠΟ 1 ΕΩς 6
ΑΝ ΩΡΕΣ [i,j] =0 ΤΟΤΕ
δεικτης_αποντων <- δεικτης_αποντων+1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ δεικτης_αποντων >2 ΤΟΤΕ
ΓΡΑΨΕ ΟΝΟΜ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΕΡΓΑΣΙΑ
ΜΕΤΑΒΛΗΤΕΣ:
ΠΡΑΓΜΑΤΙΚΕΣ: ΟΝ[100],ΩΡΕΣ[100,6],ΑΠΟΔ[100],πληρ_καν_ωρ,πληρ_υπερ_ωρ
ΑΚΕΡΑΙΕΣ: ωρ,, ωρ_εργ, i, j, δεικτης_αποντων
ΑΡΧΗ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 100 ΕΠΑΝΑΛΑΒΕ
ΓΡΑΨΕ 'ΔΩΣΕ ΟΝΟΜΑ ΕΡΓΑΖΟΜΕΝΟΥ'
ΔΙΑΒΑΣΕ ΟΝ
ΤΕΛΟΣ ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 100 ΕΠΑΝΑΛΑΒΕ
j <- 1
ωρ <- 0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε ώρες εργασίας του, ΟΝ, 'τη μέρα', j,'0 αν απουσίαζε΄
ΔΙΑΒΑΣΕ ΩΡΕΣ [i,j]
ωρ <- ωρ + ΩΡΕΣ[i,j]
j <- j+1
ΜΕΧΡΙΣ_ΟΤΟΥ j=6 Η ωρ>=12
ΤΕΛΟΣ ΕΠΑΝΑΛΗΨΗΣ
πληρ_καν_ωρ <- 0
πληρ_υπερ_ωρ <- 0
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 100
ωρ_εργ <- 0
ΓΙΑ j ΑΠΟ 1 ΕΩς 6
ωρ_εργ <- ωρ_εργ + ΩΡΕΣ[i,j]
ΑΝ ωρ_εργ=0 ΤΟΤΕ
ΑΠΟΔ <-0
ΑΛΛΙΩΣ_ΑΝ ωρ_εργ <=8 ΤΟΤΕ
ΑΠΟΔ <- ωρ_εργ*7
πληρ_καν_ωρ <- ΑΠΟΔ + πληρ_καν_ωρ
ΑΛΛΙΩΣ
ΑΠΟΔ <- ωρ_εργ*7 + (ωρ_εργ-8)*10
πληρ_υπερ_ωρ <- πληρ_υπερ_ωρ + (ωρ_εργ-8)*10
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 100
ΓΡΑΨΕ ΟΝ, ΑΠΟΔ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ πληρ_καν_ωρ ,πληρ_υπερ_ωρ
ΓΡΑΨΕ 'Λίστα απόντων'
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 100
δεικτης_αποντων <-0
ΓΙΑ j ΑΠΟ 1 ΕΩς 6
ΑΝ ΩΡΕΣ [i,j] =0 ΤΟΤΕ
δεικτης_αποντων <- δεικτης_αποντων+1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ δεικτης_αποντων >2 ΤΟΤΕ
ΓΡΑΨΕ ΟΝΟΜ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Σημείωση: Το μήνυμα αυτό γράφτηκε 15 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.