Γράψτε αλγόριθμο που:
α) διαβάζει 150 άρτιους θετικούς ακεραίους και
τους καταχωρεί στον ακέραιο πίνακα Ψ[10, 5, 3],
β) υπολογίζει :
* τη μικρότερη τιμή,
* το μέσο όρο όλου του πίνακα,
* το ποσοστό (%) των στοιχείων του που είναι
μικρότερα από το 88.
Λύση
Αλγόριθμος ΑΣΚ
Για κ από 1 μέχρι 10
Για λ από 1 μέχρι 5
Για μ από 1 μέχρι 3
Αρχή_επανάληψης
Διάβασε Ψ[κ, λ, μ]
Μέχρις_ότου (Ψ[κ, λ, μ] > 0) ΚΑΙ
(Ψ[κ, λ, μ] mod 2 = 0)
Τέλος_επανάληψης
Τέλος_επανάληψης
Τέλος_επανάληψης
Μικ <-- Ψ[1, 1, 1]
σ <-- 0
φ <-- 0
Για κ από 1 μέχρι 10
Για λ από 1 μέχρι 5
Για μ από 1 μέχρι 3
Αν Ψ[κ, λ, μ] < Μικ τότε
Μικ <-- Ψ[κ, λ, μ]
Τέλος_αν
σ <-- σ+Ψ[κ, λ, μ]
Αν Ψ[κ, λ, μ] < 88 τότε
φ <-- φ+1
Τέλος_αν
Τέλος_επανάληψης
Τέλος_επανάληψης
Τέλος_επανάληψης
ΜΟ <-- σ/150
ΠΟΣ <-- 100*φ/150
Εμφάνισε Μικ, ΜΟ, ΠΟΣ
Τέλος ΑΣΚ
α) διαβάζει 150 άρτιους θετικούς ακεραίους και
τους καταχωρεί στον ακέραιο πίνακα Ψ[10, 5, 3],
β) υπολογίζει :
* τη μικρότερη τιμή,
* το μέσο όρο όλου του πίνακα,
* το ποσοστό (%) των στοιχείων του που είναι
μικρότερα από το 88.
Λύση
Αλγόριθμος ΑΣΚ
Για κ από 1 μέχρι 10
Για λ από 1 μέχρι 5
Για μ από 1 μέχρι 3
Αρχή_επανάληψης
Διάβασε Ψ[κ, λ, μ]
Μέχρις_ότου (Ψ[κ, λ, μ] > 0) ΚΑΙ
(Ψ[κ, λ, μ] mod 2 = 0)
Τέλος_επανάληψης
Τέλος_επανάληψης
Τέλος_επανάληψης
Μικ <-- Ψ[1, 1, 1]
σ <-- 0
φ <-- 0
Για κ από 1 μέχρι 10
Για λ από 1 μέχρι 5
Για μ από 1 μέχρι 3
Αν Ψ[κ, λ, μ] < Μικ τότε
Μικ <-- Ψ[κ, λ, μ]
Τέλος_αν
σ <-- σ+Ψ[κ, λ, μ]
Αν Ψ[κ, λ, μ] < 88 τότε
φ <-- φ+1
Τέλος_αν
Τέλος_επανάληψης
Τέλος_επανάληψης
Τέλος_επανάληψης
ΜΟ <-- σ/150
ΠΟΣ <-- 100*φ/150
Εμφάνισε Μικ, ΜΟ, ΠΟΣ
Τέλος ΑΣΚ
Δεν υπάρχουν σχόλια:
Δημοσίευση σχολίου