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 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.
musicrain1
Εκκολαπτόμενο μέλος
Ο Φάνης αυτή τη στιγμή δεν είναι συνδεδεμένος. Είναι Φοιτητής. Έχει γράψει 218 μηνύματα.
25-05-09
18:07
Λοιπόν έχω μία άσκηση η οποία με έχει μπερδέψει λίγο αν και είναι σχετικά εύκολη...
Να γραφεί αλγόριθμος σε γλώσσα ο οποίος θα διαβάζει το όνομα, το φύλο και το βαθμό 50 μαθητών και θα υπολογίζει και εμφανίζει :
1. Το μέσο όρο των βαθμών
2. Το όνομα του καλύτερου και το όνομα του χειρότερου μαθητή
3 Το ποσοστό των μαθητών που είναι αγόρια και έχουν βαθμό από 15 ως 18
Το πρόγραμμα πρέπει να ελέγχει την ορθότητα των τιμών που δίνονται στην είσοδο. Κάθε βαθμός πρέπει να ανήκει στο εύρος 0-20 και το φύλο ενός μαθητή να είναι μόνο 'Α' ή 'Θ'
Αλγόριθμος Βαθμοί
Για i από 1 μέχρι 50 επανάλαβε
Αρχή_επανάληψης
Διάβασε βαθμ
Μέχρις_ότου (βαθμ>=0) ΚΑΙ (βαθμ<=20)
Διάβασε ονομ
Αρχή_επανάληψης
Διάβασε φυλ
Μέχρις_ότου (φυλ=Α) Η (φυλ=Θ)
Τέλος_επανάληψης
μεγβαθμ <- βαθμ[1]
μικβαθμ <- βαθμ[1]
συνβαθμ <- βαθμ[1]
αρ <-0
Για i από 2 μέχρι 50 επανάλαβε
Αν βαθμ> μεγβαθμ τότε
μεγβαθμ <- βαθμ
θεσημεγβαθμ <- i
Τέλος_αν
Αν βαθμ < μικβαθμ τότε
μικβαθμ <- βαθμ
θεσημικβαθμ <- i
Τέλος_αν
συνβαθμ <- συνβαθμ + βαθμ
Αν ((φυλ=Α) ΚΑΙ (βαθμ>=15)) ΚΑΙ (βαθμ<=18) τότε
αρ <- αρ + 1
Τέλος_αν
Τέλος_επανάληψης
μο <- συνβαθμ/50
ποσοστο <- 2αρ
Εμφάνισε "Μέσος όρος", μο, "Ποσοστό αγοριών με βαθμ μεγ 15 εως 18", ποσοστο, "Καλύτερος μαθητής", ονομ[θεσημεγβαθμ], "Χειρότερος μαθητής"
ονομ[θεσημικβαθμ]
Τέλος Βαθμοί
Σημείωση: Το μήνυμα αυτό γράφτηκε 15 χρόνια πριν. Ο συντάκτης του πιθανόν να έχει αλλάξει απόψεις έκτοτε.