ΑΣΚΗΣΕΙΣ
ΜΕ ΥΠΟΠΡΟΓΡΑΜΜΑΤΑ
ΜΕ ΥΠΟΠΡΟΓΡΑΜΜΑΤΑ
Κάντε κλικ για να μεταφερθείτε στην άσκηση που θέλετε..
ΑΣΚΗΣΗ ΥΠ6_ΣΤΟΙΒΑ *** (ΧΡΗΣΗ ΥΠΟΠΡΟΓΡΑΜΜΑΤΩΝ ΓΙΑ ΥΛΟΠΟΙΗΣΗ ΣΤΟΙΒΑΣ)
ΑΣΚΗΣΗ ΥΠ7_ΣΤΟΙΒΑ *** (ΧΡΗΣΗ ΣΤΟΙΒΑΣ ΓΙΑ ΜΕΤΑΤΡΟΠΗ ΔΕΚΑΔΙΚΟΥ ΑΡΙΘΜΟΥ ΣΕ ΔΥΑΔΙΚΟ)
ΑΣΚΗΣΗ ΥΠ8_ΣΤΟΙΒΑ *** (ΧΡΗΣΗ ΣΤΟΙΒΑΣ ΓΙΑ ΕΛΕΓΧΟ ΠΛΗΘΟΥΣ ΕΙΣΕΡΧΟΜΕΝΩΝ -ΕΞΕΡΧΟΜΕΝΩΝ)
ΑΣΚΗΣΗ ΥΠ1 *
Να γράψετε συνάρτηση Μ_0_3 σε ΓΛΩΣΣΑ η οποία να υπολογίζει το μέσο όρο 3 ακεραίων.
Απάντηση
ΣΥΝΑΡΤΗΣΗ Μ_Ο_3(Α, Β, Γ): ΠΡΑΓΜΑΤΙΚΗ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Α, Β, Γ
ΑΡΧΗ
Μ_Ο_3 <- (Α+Β+Γ)/3
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
Να γράψετε συνάρτηση Μ_0_3 σε ΓΛΩΣΣΑ η οποία να υπολογίζει το μέσο όρο 3 ακεραίων.
Απάντηση
ΣΥΝΑΡΤΗΣΗ Μ_Ο_3(Α, Β, Γ): ΠΡΑΓΜΑΤΙΚΗ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Α, Β, Γ
ΑΡΧΗ
Μ_Ο_3 <- (Α+Β+Γ)/3
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
ΑΣΚΗΣΗ ΥΠ2 *
Να γράψετε συνάρτηση σε ΓΛΩΣΣΑ η οποία θα παίρνει είσοδο τα ονόματα και τους πόντους που πέτυχαν 2 ομάδες μπάσκετ και θα δίνει σαν αποτέλεσμα το όνομα της νικήτριας ομάδας ή το μήνυμα "ΙΣΟΠΑΛΙΑ".
Απάντηση
ΣΥΝΑΡΤΗΣΗ ΑΓ(Ο1, Ο2,Π1, Π2): ΧΑΡΑΚΤΗΡΑΣ
ΜΕΤΑΒΛΗΤΕΣ
ΧΑΡΑΚΤΗΡΕΣ: Ο1, Ο2
ΑΚΕΡΑΙΕΣ : Π1, Π2
ΑΡΧΗ
ΑΝ Π1>Π2 ΤΟΤΕ
ΑΓ <- Ο1
ΑΛΛΙΩΣ_ΑΝ Π1<Π2 ΤΟΤΕ
ΑΓ <- Ο2
ΑΛΛΙΩΣ
ΑΓ <- 'ΙΣΟΠΑΛΙΑ'
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
Να γράψετε συνάρτηση σε ΓΛΩΣΣΑ η οποία θα παίρνει είσοδο τα ονόματα και τους πόντους που πέτυχαν 2 ομάδες μπάσκετ και θα δίνει σαν αποτέλεσμα το όνομα της νικήτριας ομάδας ή το μήνυμα "ΙΣΟΠΑΛΙΑ".
Απάντηση
ΣΥΝΑΡΤΗΣΗ ΑΓ(Ο1, Ο2,Π1, Π2): ΧΑΡΑΚΤΗΡΑΣ
ΜΕΤΑΒΛΗΤΕΣ
ΧΑΡΑΚΤΗΡΕΣ: Ο1, Ο2
ΑΚΕΡΑΙΕΣ : Π1, Π2
ΑΡΧΗ
ΑΝ Π1>Π2 ΤΟΤΕ
ΑΓ <- Ο1
ΑΛΛΙΩΣ_ΑΝ Π1<Π2 ΤΟΤΕ
ΑΓ <- Ο2
ΑΛΛΙΩΣ
ΑΓ <- 'ΙΣΟΠΑΛΙΑ'
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
ΑΣΚΗΣΗ ΥΠ3 *
Να γράψετε διαδικασία σε ΓΛΩΣΣΑ η οποία θα διαβάζει 2 πραγματικούς αριθμούς και θα ελέγχει αν αυτοί είναι θετικοί.
Απάντηση
ΔΙΑΔΙΚΑΣΙΑ ΘΕΤΙΚΟΙ(Α, Β)
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Α, Β
ΑΡΧΗ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ Α
ΜΕΧΡΙΣ_ΟΤΟΥ Α>0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ Β
ΜΕΧΡΙΣ_ΟΤΟΥ Β>0
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
Να γράψετε διαδικασία σε ΓΛΩΣΣΑ η οποία θα διαβάζει 2 πραγματικούς αριθμούς και θα ελέγχει αν αυτοί είναι θετικοί.
Απάντηση
ΔΙΑΔΙΚΑΣΙΑ ΘΕΤΙΚΟΙ(Α, Β)
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Α, Β
ΑΡΧΗ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ Α
ΜΕΧΡΙΣ_ΟΤΟΥ Α>0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ Β
ΜΕΧΡΙΣ_ΟΤΟΥ Β>0
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΑΣΚΗΣΗ ΥΠ4 **
Να γράψετε διαδικασία σε ΓΛΩΣΣΑ η οποία θα εφαρμόζει σειριακή αναζήτηση σε πίνακα ακεραίων Π[50] και θα επιστρέφει ΑΛΗΘΗΣ ή ΨΕΥΔΗΣ αναλόγως αν βρεθεί το ζητούμενο στοιχείο στον πίνακα ή όχι. Όταν το ζητούμενο στοιχείο βρεθεί να σταματά η αναζήτηση.
Απάντηση
ΔΙΑΔΙΚΑΣΙΑ ΣΕΡΙΑΚΗ(Π, ΖΗΤΟΥΜΕΝΟ, ΒΡΕΘΗΚΕ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Π[50], ι, ΖΗΤΟΥΜΕΝΟ
ΛΟΓΙΚΕΣ : ΒΡΕΘΗΚΕ
ΑΡΧΗ
ΒΡΕΘΗΚΕ<- ΨΕΥΔΗΣ
ι <- 1
ΟΣΟ ι<=50 ΚΑΙ ΒΡΕΘΗΚΕ = ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ
ΑΝ ΖΗΤΟΥΜΕΝΟ = Π[ι] ΤΟΤΕ
ΒΡΕΘΗΚΕ <- ΑΛΗΘΗΣ
ΤΕΛΟΣ_ΑΝ
ι<- ι + 1
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
Να γράψετε διαδικασία σε ΓΛΩΣΣΑ η οποία θα εφαρμόζει σειριακή αναζήτηση σε πίνακα ακεραίων Π[50] και θα επιστρέφει ΑΛΗΘΗΣ ή ΨΕΥΔΗΣ αναλόγως αν βρεθεί το ζητούμενο στοιχείο στον πίνακα ή όχι. Όταν το ζητούμενο στοιχείο βρεθεί να σταματά η αναζήτηση.
Απάντηση
ΔΙΑΔΙΚΑΣΙΑ ΣΕΡΙΑΚΗ(Π, ΖΗΤΟΥΜΕΝΟ, ΒΡΕΘΗΚΕ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Π[50], ι, ΖΗΤΟΥΜΕΝΟ
ΛΟΓΙΚΕΣ : ΒΡΕΘΗΚΕ
ΑΡΧΗ
ΒΡΕΘΗΚΕ<- ΨΕΥΔΗΣ
ι <- 1
ΟΣΟ ι<=50 ΚΑΙ ΒΡΕΘΗΚΕ = ΨΕΥΔΗΣ ΕΠΑΝΑΛΑΒΕ
ΑΝ ΖΗΤΟΥΜΕΝΟ = Π[ι] ΤΟΤΕ
ΒΡΕΘΗΚΕ <- ΑΛΗΘΗΣ
ΤΕΛΟΣ_ΑΝ
ι<- ι + 1
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΑΣΚΗΣΗ ΥΠ5 **
Να γράψετε πρόγραμμα το οποίο να διαβάζει έναν πίνακα 100 πραγματικών με την βοήθεια μια διαδικασίας και να υπολογίζει τον μέσο όρο των στοιχείων αυτών. Ο υπολογισμός του μέσου όρου να γίνει με την βοήθεια συνάρτησης.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ5
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Π[100]
ΑΡΧΗ
ΚΑΛΕΣΕ ΕΙΣΑΓΩΓΗ(Π) !ΚΑΛΟΥΜΕ ΔΙΑΔΙΚΑΣΙΑ ΓΙΑ ΕΙΣΑΓΩΓΗ ΤΩΝ ΣΤΟΙΧΕΙΩΝ ΤΟΥ ΠΙΝΑΚΑ Π . Ο ΠΙΝΑΚΑΣ ΑΝΑΦΕΡΕΤΕ ΣΤΙΣ ΠΑΡΑΜΕΤΡΟΥΣ ΑΠΛΑ ΜΕ ΤΟ
! ΟΝΟΜΑ ΤΟΥ ΔΛΔ Π
ΓΡΑΨΕ ΜΟ[Π] !ΚΑΛΟΥΜΕ ΤΗ ΣΥΝΑΡΤΗΣΗ ΜΟ ΓΙΑ ΤΟΝ ΠΙΝΑΚΑ Π
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ ΕΙΣΑΓΩΓΗ(Π)
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Π[100], ι
ΑΡΧΗ
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 100
ΔΙΑΒΑΣΕ Π[ι]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΣΥΝΑΡΤΗΣΗ ΜΟ(Π) : ΠΡΑΓΜΑΤΙΚΗ
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Π[100], ι , ΑΘΡΟΙΣΜΑ
ΑΡΧΗ
ΑΘΡΟΙΣΜΑ <- 0
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 100
ΑΘΡΟΙΣΜΑ <- ΑΘΡΟΙΣΜΑ + Π[ι]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΜΟ <- ΑΘΡΟΙΣΜΑ / 100
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
Να γράψετε πρόγραμμα το οποίο να διαβάζει έναν πίνακα 100 πραγματικών με την βοήθεια μια διαδικασίας και να υπολογίζει τον μέσο όρο των στοιχείων αυτών. Ο υπολογισμός του μέσου όρου να γίνει με την βοήθεια συνάρτησης.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ5
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Π[100]
ΑΡΧΗ
ΚΑΛΕΣΕ ΕΙΣΑΓΩΓΗ(Π) !ΚΑΛΟΥΜΕ ΔΙΑΔΙΚΑΣΙΑ ΓΙΑ ΕΙΣΑΓΩΓΗ ΤΩΝ ΣΤΟΙΧΕΙΩΝ ΤΟΥ ΠΙΝΑΚΑ Π . Ο ΠΙΝΑΚΑΣ ΑΝΑΦΕΡΕΤΕ ΣΤΙΣ ΠΑΡΑΜΕΤΡΟΥΣ ΑΠΛΑ ΜΕ ΤΟ
! ΟΝΟΜΑ ΤΟΥ ΔΛΔ Π
ΓΡΑΨΕ ΜΟ[Π] !ΚΑΛΟΥΜΕ ΤΗ ΣΥΝΑΡΤΗΣΗ ΜΟ ΓΙΑ ΤΟΝ ΠΙΝΑΚΑ Π
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ ΕΙΣΑΓΩΓΗ(Π)
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Π[100], ι
ΑΡΧΗ
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 100
ΔΙΑΒΑΣΕ Π[ι]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΣΥΝΑΡΤΗΣΗ ΜΟ(Π) : ΠΡΑΓΜΑΤΙΚΗ
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Π[100], ι , ΑΘΡΟΙΣΜΑ
ΑΡΧΗ
ΑΘΡΟΙΣΜΑ <- 0
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 100
ΑΘΡΟΙΣΜΑ <- ΑΘΡΟΙΣΜΑ + Π[ι]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΜΟ <- ΑΘΡΟΙΣΜΑ / 100
ΤΕΛΟΣ_ΣΥΝΑΡΤΗΣΗΣ
ΑΣΚΗΣΗ ΥΠ6_ΣΤΟΙΒΑ *** (ΧΡΗΣΗ ΥΠΟΠΡΟΓΡΑΜΜΑΤΩΝ ΓΙΑ ΥΛΟΠΟΙΗΣΗ ΣΤΟΙΒΑΣ)
Να υλοποιήσετε την ώθηση και την απώθηση σε στοίβα με χρήση υποπρογραμμάτων. Στο κυρίως πρόγραμμα να γίνεται ώθηση 10 στοιχείων και στη συνέχεια απώθηση 10 στοιχείων. Η στοίβα να υλοποιηθεί με πίνακα 50 θέσεων. Τα υποπρογράμματα να έχουν ως έξοδο τη στοίβα, έναν δείκτη και μια λογική μεταβλητή για το αν η ενέργεια ολοκληρώθηκε.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ6_ΣΤΟΙΒΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : ι, κορυφή, Σ[50], στοιχείο
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
κορυφή <- 0
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 10
ΔΙΑΒΑΣΕ στοιχείο
ΚΑΛΕΣΕ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 10
ΚΑΛΕΣΕ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΓΡΑΨΕ στοιχείο
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή <50 ΤΟΤΕ
κορυφή <- κορυφή + 1
Σ[κορυφή] <- στοιχείο
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΔΙΑΔΙΚΑΣΙΑ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή >0 ΤΟΤΕ
στοιχείο <- Σ[κορυφή]
κορυφή <- κορυφή -1
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
Να υλοποιήσετε την ώθηση και την απώθηση σε στοίβα με χρήση υποπρογραμμάτων. Στο κυρίως πρόγραμμα να γίνεται ώθηση 10 στοιχείων και στη συνέχεια απώθηση 10 στοιχείων. Η στοίβα να υλοποιηθεί με πίνακα 50 θέσεων. Τα υποπρογράμματα να έχουν ως έξοδο τη στοίβα, έναν δείκτη και μια λογική μεταβλητή για το αν η ενέργεια ολοκληρώθηκε.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ6_ΣΤΟΙΒΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : ι, κορυφή, Σ[50], στοιχείο
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
κορυφή <- 0
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 10
ΔΙΑΒΑΣΕ στοιχείο
ΚΑΛΕΣΕ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ ι ΑΠΟ 1 ΜΕΧΡΙ 10
ΚΑΛΕΣΕ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΓΡΑΨΕ στοιχείο
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή <50 ΤΟΤΕ
κορυφή <- κορυφή + 1
Σ[κορυφή] <- στοιχείο
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΔΙΑΔΙΚΑΣΙΑ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή >0 ΤΟΤΕ
στοιχείο <- Σ[κορυφή]
κορυφή <- κορυφή -1
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΑΣΚΗΣΗ ΥΠ7_ΣΤΟΙΒΑ *** (ΧΡΗΣΗ ΣΤΟΙΒΑΣ ΓΙΑ ΜΕΤΑΤΡΟΠΗ ΔΕΚΑΔΙΚΟΥ ΑΡΙΘΜΟΥ ΣΕ ΔΥΑΔΙΚΟ)
Να χρησιμοποιήσετε στοίβα για να υλοποιήσετε την μετατροπή ενός θετικού δεκαδικού αριθμού [0-10000] στον αντίστοιχο δυαδικό. Για την ώθηση και την απώθηση των στοιχείων της στοίβας να χρησιμοποιήσετε διαδικασίες. Στη συνέχεια να εμφανίζεται ο δυαδικός αριθμός.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ7_ΣΤΟΙΒΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή, Σ[50], στοιχείο, δεκαδικος
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
κορυφή <- 0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ !έλεγχος ορθότητας εισόδου για τον δεκαδικό αριθμό
ΔΙΑΒΑΣΕ δεκαδικος
ΜΕΧΡΙΣ_ΟΤΟΥ δεκαδικος >= 0 ΚΑΙ δεκαδικος <=10000
ΟΣΟ δεκαδικος > 0 ΕΠΑΝΑΛΑΒΕ !Υπολογισμός του δυαδικού με τη βοήθεια της ώθησης σε στοίβα
στοιχείο <- δεκαδικος MOD 2
ΚΑΛΕΣΕ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
δεκαδικος <- δεκαδικος DIV 2
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΚΑΛΕΣΕ Απωθηση(Σ, στοιχείο, κορυφή, οκ)
ΑΝ οκ= ΑΛΗΘΗΣ ΤΟΤΕ
ΓΡΑΨΕ στοιχείο
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ οκ = ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή <50 ΤΟΤΕ
κορυφή <- κορυφή + 1
Σ[κορυφή] <- στοιχείο
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΔΙΑΔΙΚΑΣΙΑ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή >0 ΤΟΤΕ
στοιχείο <- Σ[κορυφή]
κορυφή <- κορυφή -1
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
Να χρησιμοποιήσετε στοίβα για να υλοποιήσετε την μετατροπή ενός θετικού δεκαδικού αριθμού [0-10000] στον αντίστοιχο δυαδικό. Για την ώθηση και την απώθηση των στοιχείων της στοίβας να χρησιμοποιήσετε διαδικασίες. Στη συνέχεια να εμφανίζεται ο δυαδικός αριθμός.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ7_ΣΤΟΙΒΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή, Σ[50], στοιχείο, δεκαδικος
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
κορυφή <- 0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ !έλεγχος ορθότητας εισόδου για τον δεκαδικό αριθμό
ΔΙΑΒΑΣΕ δεκαδικος
ΜΕΧΡΙΣ_ΟΤΟΥ δεκαδικος >= 0 ΚΑΙ δεκαδικος <=10000
ΟΣΟ δεκαδικος > 0 ΕΠΑΝΑΛΑΒΕ !Υπολογισμός του δυαδικού με τη βοήθεια της ώθησης σε στοίβα
στοιχείο <- δεκαδικος MOD 2
ΚΑΛΕΣΕ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
δεκαδικος <- δεκαδικος DIV 2
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΚΑΛΕΣΕ Απωθηση(Σ, στοιχείο, κορυφή, οκ)
ΑΝ οκ= ΑΛΗΘΗΣ ΤΟΤΕ
ΓΡΑΨΕ στοιχείο
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ οκ = ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή <50 ΤΟΤΕ
κορυφή <- κορυφή + 1
Σ[κορυφή] <- στοιχείο
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΔΙΑΔΙΚΑΣΙΑ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : Σ[50], στοιχείο, κορυφή
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή >0 ΤΟΤΕ
στοιχείο <- Σ[κορυφή]
κορυφή <- κορυφή -1
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΑΣΚΗΣΗ ΥΠ8_ΣΤΟΙΒΑ *** (ΧΡΗΣΗ ΣΤΟΙΒΑΣ ΓΙΑ ΕΛΕΓΧΟ ΠΛΗΘΟΥΣ ΕΙΣΕΡΧΟΜΕΝΩΝ -ΕΞΕΡΧΟΜΕΝΩΝ)
Να χρησιμοποιήσετε στοίβα για να υλοποιήσετε τον έλεγχο εισερχομένων (εισ) - εξερχομένων (εξ) εγγράφων σε μία υπηρεσία. Στο τέλος κάθε ημέρας πρέπει όλα τα εισερχόμενα να έχουν ελεγχθεί και να επιστρέφουν ως εξερχόμενα στον αποστολέα τους. Κάθε εισ. σημειώνεται με το σύμβολο '+' και κάθε εξ. με το σύμβολο '-'. Να χρησιμοποιήσετε πίνακα 50 θέσεων για την υλοποίηση της στοίβας. Σε περίπτωση λάθους όσον αφορά το συνολικό πλήθος εισ -εξ (τα οποία πρέπει να είναι ίσα) να εμφανίζεται το μήνυμα 'Παρακαλώ ελέγξτε τα εισ και τα εξ.' αλλιώς να εμφανίζει το μήνυμα 'Καλή δουλειά σήμερα!'. Να πραγματοποιείται έλεγχος εισόδου για το σύμβολο εισ-εξ. Το τέλος εισόδου πραγματοποιείται αν δοθεί είσοδος η λέξη 'ΤΕΛΟΣ'.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ8_ΣΤΟΙΒΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή
ΧΑΡΑΚΤΗΡΕΣ : συμβολο, ΣΤ[50]
ΛΟΓΙΚΕΣ : οκ, οχι_λαθος
ΑΡΧΗ
κορυφή <- 0
οχι_λαθος <- ΑΛΗΘΗΣ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ !έλεγχος ορθότητας εισόδου
ΔΙΑΒΑΣΕ συμβολο
ΜΕΧΡΙΣ_ΟΤΟΥ συμβολο = '+' Ή συμβολο = '-'
ΟΣΟ συμβολο<>'ΤΕΛΟΣ' ΚΑΙ οχι_λαθος = ΑΛΗΘΗΣ ΕΠΑΝΑΛΑΒΕ
ΑΝ συμβολο = '+' ΤΟΤΕ
ΚΑΛΕΣΕ Ωθηση(ΣΤ, συμβολο, κορυφη, οκ)
ΑΛΛΙΩΣ_ΑΝ συμβολο = '-' ΤΟΤΕ
ΚΑΛΕΣΕ Απωθηση(ΣΤ, συμβολο, κορυφη, οκ)
ΑΝ οκ=ΨΕΥΔΗΣ ΤΟΤΕ οχι_λαθος<- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΑΝ οχι_λαθος = ΑΛΗΘΗΣ ΤΟΤΕ ΔΙΑΒΑΣΕ συμβολο
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ συμβολο = 'ΤΕΛΟΣ' ΤΟΤΕ !Στο τέλος θα πρέπει η στοίβα να είναι αδεια. Δλδ η απώθηση να δώσει οκ ΨΕΥΔΗΣ, αλλιώς έχουμε λάθος
ΚΑΛΕΣΕ Απωθηση(ΣΤ, συμβολο, κορυφη, οκ)
ΑΝ οκ = ΑΛΗΘΗΣ ΤΟΤΕ οχι_λαθος <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΑΝ οχι_λαθος = ΨΕΥΔΗΣ ΤΟΤΕ
ΓΡΑΨΕ 'Παρακαλώ ελέγξτε τα εισ και τα εξ.'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Καλή δουλειά σήμερα!'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή
ΧΑΡΑΚΤΗΡΕΣ : στοιχείο, ΣΤ[50]
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή <50 ΤΟΤΕ
κορυφή <- κορυφή + 1
Σ[κορυφή] <- στοιχείο
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΔΙΑΔΙΚΑΣΙΑ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή
ΧΑΡΑΚΤΗΡΕΣ : στοιχείο, ΣΤ[50]
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή >0 ΤΟΤΕ
στοιχείο <- Σ[κορυφή]
κορυφή <- κορυφή -1
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
Να χρησιμοποιήσετε στοίβα για να υλοποιήσετε τον έλεγχο εισερχομένων (εισ) - εξερχομένων (εξ) εγγράφων σε μία υπηρεσία. Στο τέλος κάθε ημέρας πρέπει όλα τα εισερχόμενα να έχουν ελεγχθεί και να επιστρέφουν ως εξερχόμενα στον αποστολέα τους. Κάθε εισ. σημειώνεται με το σύμβολο '+' και κάθε εξ. με το σύμβολο '-'. Να χρησιμοποιήσετε πίνακα 50 θέσεων για την υλοποίηση της στοίβας. Σε περίπτωση λάθους όσον αφορά το συνολικό πλήθος εισ -εξ (τα οποία πρέπει να είναι ίσα) να εμφανίζεται το μήνυμα 'Παρακαλώ ελέγξτε τα εισ και τα εξ.' αλλιώς να εμφανίζει το μήνυμα 'Καλή δουλειά σήμερα!'. Να πραγματοποιείται έλεγχος εισόδου για το σύμβολο εισ-εξ. Το τέλος εισόδου πραγματοποιείται αν δοθεί είσοδος η λέξη 'ΤΕΛΟΣ'.
Απάντηση
ΠΡΟΓΡΑΜΜΑ ΥΠ8_ΣΤΟΙΒΑ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή
ΧΑΡΑΚΤΗΡΕΣ : συμβολο, ΣΤ[50]
ΛΟΓΙΚΕΣ : οκ, οχι_λαθος
ΑΡΧΗ
κορυφή <- 0
οχι_λαθος <- ΑΛΗΘΗΣ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ !έλεγχος ορθότητας εισόδου
ΔΙΑΒΑΣΕ συμβολο
ΜΕΧΡΙΣ_ΟΤΟΥ συμβολο = '+' Ή συμβολο = '-'
ΟΣΟ συμβολο<>'ΤΕΛΟΣ' ΚΑΙ οχι_λαθος = ΑΛΗΘΗΣ ΕΠΑΝΑΛΑΒΕ
ΑΝ συμβολο = '+' ΤΟΤΕ
ΚΑΛΕΣΕ Ωθηση(ΣΤ, συμβολο, κορυφη, οκ)
ΑΛΛΙΩΣ_ΑΝ συμβολο = '-' ΤΟΤΕ
ΚΑΛΕΣΕ Απωθηση(ΣΤ, συμβολο, κορυφη, οκ)
ΑΝ οκ=ΨΕΥΔΗΣ ΤΟΤΕ οχι_λαθος<- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΑΝ οχι_λαθος = ΑΛΗΘΗΣ ΤΟΤΕ ΔΙΑΒΑΣΕ συμβολο
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ συμβολο = 'ΤΕΛΟΣ' ΤΟΤΕ !Στο τέλος θα πρέπει η στοίβα να είναι αδεια. Δλδ η απώθηση να δώσει οκ ΨΕΥΔΗΣ, αλλιώς έχουμε λάθος
ΚΑΛΕΣΕ Απωθηση(ΣΤ, συμβολο, κορυφη, οκ)
ΑΝ οκ = ΑΛΗΘΗΣ ΤΟΤΕ οχι_λαθος <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΑΝ οχι_λαθος = ΨΕΥΔΗΣ ΤΟΤΕ
ΓΡΑΨΕ 'Παρακαλώ ελέγξτε τα εισ και τα εξ.'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Καλή δουλειά σήμερα!'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΔΙΑΔΙΚΑΣΙΑ Ωθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή
ΧΑΡΑΚΤΗΡΕΣ : στοιχείο, ΣΤ[50]
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή <50 ΤΟΤΕ
κορυφή <- κορυφή + 1
Σ[κορυφή] <- στοιχείο
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
ΔΙΑΔΙΚΑΣΙΑ Απώθηση(Σ, στοιχείο, κορυφή, οκ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ : κορυφή
ΧΑΡΑΚΤΗΡΕΣ : στοιχείο, ΣΤ[50]
ΛΟΓΙΚΕΣ : οκ
ΑΡΧΗ
ΑΝ κορυφή >0 ΤΟΤΕ
στοιχείο <- Σ[κορυφή]
κορυφή <- κορυφή -1
οκ <- ΑΛΗΘΗΣ
ΑΛΛΙΩΣ
οκ <- ΨΕΥΔΗΣ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ
Ο ΒΑΘΜΟΣ ΔΥΣΚΟΛΙΑΣ ΤΩΝ ΑΣΚΗΣΕΩΝ ΣΗΜΕΙΩΝΕΤΑΙ ΜΕ ΑΣΤΕΡΙΣΚΟΥΣ
* ΕΥΚΟΛΗ
** ΜΕΤΡΙΑ
*** ΔΥΣΚΟΛΗ
**** ΠΟΛΥ ΔΥΣΚΟΛΗ
* ΕΥΚΟΛΗ
** ΜΕΤΡΙΑ
*** ΔΥΣΚΟΛΗ
**** ΠΟΛΥ ΔΥΣΚΟΛΗ
Antonis Baboukis 2015 Τελευταία Ενημέρωση 16/02/2016