Οι ασκήσεις στην δομή της επιλογής θα μας βοηθήσουν να καταλάβουμε τον τρόπο με τον οποίο ένα πρόγραμμα μπορεί να "λάβει" αποφάσεις με βάση κάποιες συνθήκες.
Άσκηση 1
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται έναν τυχαίο αριθμό και θα εξετάζει αν είναι πολλαπλάσιος του 7.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται έναν τυχαίο αριθμό και θα εξετάζει αν είναι πολλαπλάσιος του 7.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_1
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
ΑΝ Χ MOD 7 = 0 ΤΟΤΕ
ΓΡΑΨΕ ' Ο ΑΡΙΘΜΟΣ ΕΙΝΑΙ ΠΟΛΛΑΠΛΑΣΙΟΣ ΤΟΥ 7'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_1
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
ΑΝ Χ MOD 7 = 0 ΤΟΤΕ
ΓΡΑΨΕ ' Ο ΑΡΙΘΜΟΣ ΕΙΝΑΙ ΠΟΛΛΑΠΛΑΣΙΟΣ ΤΟΥ 7'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 2
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται έναν τυχαίο αριθμό και θα εξετάζει αν το τελευταίο του ψηφίο είναι το 5.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται έναν τυχαίο αριθμό και θα εξετάζει αν το τελευταίο του ψηφίο είναι το 5.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_2
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
ΑΝ Χ MOD 10 = 5 ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΤΕΛΕΥΤΑΙΟ ΨΗΦΙΟ ΤΟΥ ΑΡΙΘΜΟΥ',Χ,' ΕΙΝΑΙ: 5 '
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_2
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
ΑΝ Χ MOD 10 = 5 ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΤΕΛΕΥΤΑΙΟ ΨΗΦΙΟ ΤΟΥ ΑΡΙΘΜΟΥ',Χ,' ΕΙΝΑΙ: 5 '
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 3
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται ένα τυχαίο αριθμό και θα εξετάζει αν το άθροισμα των ψηφίων του είναι μεγαλύτερο από το 10.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται ένα τυχαίο αριθμό και θα εξετάζει αν το άθροισμα των ψηφίων του είναι μεγαλύτερο από το 10.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_3
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ,Α,Β,Σ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Α<--Χ DIV 10 ! ΥΠΟΛΟΓΙΣΜΟΣ ΤΟΥ 1ου ΨΗΦΙΟΥ ,ΔΗΛΑΔΗ ΤΩΝ ΔΕΚΑΔΩΝ
Β<-- X MOD 10 !ΥΠΟΛΟΓΙΣΜΟΣ ΤΟΥ ΨΗΦΙΟΥ ΤΩΝ ΜΟΝΑΔΩΝ
Σ<--Α+Β
ΑΝ Σ>10 ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΑΘΡΟΙΣΜΑ ΤΩΝ ΨΗΦΙΩΝ ΕΙΝΑΙ ΜΕΓΑΛΥΤΕΡΟ ΑΠΟ ΤΟ 10'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_3
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ,Α,Β,Σ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Α<--Χ DIV 10 ! ΥΠΟΛΟΓΙΣΜΟΣ ΤΟΥ 1ου ΨΗΦΙΟΥ ,ΔΗΛΑΔΗ ΤΩΝ ΔΕΚΑΔΩΝ
Β<-- X MOD 10 !ΥΠΟΛΟΓΙΣΜΟΣ ΤΟΥ ΨΗΦΙΟΥ ΤΩΝ ΜΟΝΑΔΩΝ
Σ<--Α+Β
ΑΝ Σ>10 ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΑΘΡΟΙΣΜΑ ΤΩΝ ΨΗΦΙΩΝ ΕΙΝΑΙ ΜΕΓΑΛΥΤΕΡΟ ΑΠΟ ΤΟ 10'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 4
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται δύο τυχαίους αριθμούς και θα εξετάζει αν ο πρώτος είναι πολλαπλάσιος του δεύτερου.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται δύο τυχαίους αριθμούς και θα εξετάζει αν ο πρώτος είναι πολλαπλάσιος του δεύτερου.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_4
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Α,Β
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΔΥΟ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β
ΑΝ Α MOD Β = 0 ΤΟΤΕ
ΓΡΑΨΕ 'Ο ΑΡΙΘΜΟΣ ',Α,' ΕΙΝΑΙ ΠΟΛΛΑΠΛΑΣΙΟΣ ΤΟΥ :',Β
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Ο ΑΡΙΘΜΟΣ',Α,' ΔΕΝ ΕΙΝΑΙ ΠΟΛΛΑΠΛΑΣΙΟΣ ΤΟΥ:',Β
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_4
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Α,Β
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΔΥΟ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β
ΑΝ Α MOD Β = 0 ΤΟΤΕ
ΓΡΑΨΕ 'Ο ΑΡΙΘΜΟΣ ',Α,' ΕΙΝΑΙ ΠΟΛΛΑΠΛΑΣΙΟΣ ΤΟΥ :',Β
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Ο ΑΡΙΘΜΟΣ',Α,' ΔΕΝ ΕΙΝΑΙ ΠΟΛΛΑΠΛΑΣΙΟΣ ΤΟΥ:',Β
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 5
Ένα κατάστημα στο Internet προσφέρει τα προϊόντα του με τους εξής τρόπους:
Α. Πληρωμή τοις μετρητής: Έκπτωση 5%
Β. Πληρωμή σε 6 δόσεις: Άτοκα.
Γ.Πληρωμή σε 12 δόσεις με 5% τόκο.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται την αξία των προϊόντων που αγόρασε κάποιος και τον τρόπο πληρωμής ( Α, Β ή Γ ) και θα εμφανίζει το τελικό κόστος. Στη περίπτωση των δόσεων θα εμφανίζει και το ποσό της κάθε δόσης.
Ένα κατάστημα στο Internet προσφέρει τα προϊόντα του με τους εξής τρόπους:
Α. Πληρωμή τοις μετρητής: Έκπτωση 5%
Β. Πληρωμή σε 6 δόσεις: Άτοκα.
Γ.Πληρωμή σε 12 δόσεις με 5% τόκο.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται την αξία των προϊόντων που αγόρασε κάποιος και τον τρόπο πληρωμής ( Α, Β ή Γ ) και θα εμφανίζει το τελικό κόστος. Στη περίπτωση των δόσεων θα εμφανίζει και το ποσό της κάθε δόσης.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_5
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Τ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Π,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΑΞΙΑ ΤΩΝ ΠΡΟΪΟΝΤΩΝ'
ΔΙΑΒΑΣΕ Χ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟΝ ΤΡΟΠΟ ΠΛΗΡΩΜΗΣ'
ΔΙΑΒΑΣΕ Τ
ΑΝ Τ=1 ΤΟΤΕ
Π<--Χ-Χ*5/100
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΠΛΗΡΩΜΗΣ ΕΙΝΑΙ:',Π
ΑΛΛΙΩΣ_ΑΝ Τ=2 ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΠΛΗΡΩΜΗΣ ΕΙΝΑΙ:',Χ
ΓΡΑΨΕ'ΤΟ ΠΟΣΟ ΤΗΣ ΚΑΘΕ ΔΟΣΗΣ ΕΙΝΑΙ:',Χ/6
ΑΛΛΙΩΣ
Κ<--Κ+Κ*5/100
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΠΛΗΡΩΜΗΣ ΕΙΝΑΙ:',Κ
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΤΗΣ ΚΑΘΕ ΔΟΣΗΣ ΕΙΝΑΙ:',Κ/12
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_5
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Τ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Π,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΑΞΙΑ ΤΩΝ ΠΡΟΪΟΝΤΩΝ'
ΔΙΑΒΑΣΕ Χ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟΝ ΤΡΟΠΟ ΠΛΗΡΩΜΗΣ'
ΔΙΑΒΑΣΕ Τ
ΑΝ Τ=1 ΤΟΤΕ
Π<--Χ-Χ*5/100
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΠΛΗΡΩΜΗΣ ΕΙΝΑΙ:',Π
ΑΛΛΙΩΣ_ΑΝ Τ=2 ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΠΛΗΡΩΜΗΣ ΕΙΝΑΙ:',Χ
ΓΡΑΨΕ'ΤΟ ΠΟΣΟ ΤΗΣ ΚΑΘΕ ΔΟΣΗΣ ΕΙΝΑΙ:',Χ/6
ΑΛΛΙΩΣ
Κ<--Κ+Κ*5/100
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΠΛΗΡΩΜΗΣ ΕΙΝΑΙ:',Κ
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΤΗΣ ΚΑΘΕ ΔΟΣΗΣ ΕΙΝΑΙ:',Κ/12
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 6
Σε ανακοίνωσή της η εφορία καλεί όλους τους πολίτες να περάσουν από τα γραφεία της για την εκτέλεση συγκεκριμένης εργασίας. Για να διευκολυνθεί η διαδικασία η σειρά θα καθορίζεται με βάση το ΑΦΜ του κάθε πολίτη ως εξής: Αν ο ΑΦΜ λήγει σε 1 ή 2 ο πολίτης οφείλει να περάσει τους μήνες Ιανουάριο ή Φεβρουάριο, αν λήγει σε 3 ή 4 τους μήνες Μάρτιο ή Απρίλιο , αν λήγει σε 6 ή 7 τους μήνες Μάιο ή Ιούνιο ενώ οι υπόλοιποι τους μήνες Ιούλιο ή Αύγουστο. Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται τον ΑΦΜ ενός πολίτη και θα τον ενημερώνει σχετικά με τους μήνες που θα πρέπει να παρουσιαστεί στη εφορία.
Σε ανακοίνωσή της η εφορία καλεί όλους τους πολίτες να περάσουν από τα γραφεία της για την εκτέλεση συγκεκριμένης εργασίας. Για να διευκολυνθεί η διαδικασία η σειρά θα καθορίζεται με βάση το ΑΦΜ του κάθε πολίτη ως εξής: Αν ο ΑΦΜ λήγει σε 1 ή 2 ο πολίτης οφείλει να περάσει τους μήνες Ιανουάριο ή Φεβρουάριο, αν λήγει σε 3 ή 4 τους μήνες Μάρτιο ή Απρίλιο , αν λήγει σε 6 ή 7 τους μήνες Μάιο ή Ιούνιο ενώ οι υπόλοιποι τους μήνες Ιούλιο ή Αύγουστο. Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται τον ΑΦΜ ενός πολίτη και θα τον ενημερώνει σχετικά με τους μήνες που θα πρέπει να παρουσιαστεί στη εφορία.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_6
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΑΦΜ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟΝ ΑΦΜ'
ΔΙΑΒΑΣΕ ΑΦΜ
ΑΝ (ΑΦΜ MOD 10 = 1) H (ΑΦΜ MOD 10 = 2) ΤΟΤΕ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΙΑΝΟΥΑΡΙΟ Η ΤΟΝ ΦΕΒΡΟΥΑΡΙΟ'
ΑΛΛΙΩΣ_ΑΝ (ΑΦΜ MOD 10 = 3) H (ΑΦΜ MOD 10 = 4) ΤΟΤΕ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΜΑΡΤΙΟ Η ΤΟΝ ΑΠΡΙΛΙΟ'
ΑΛΛΙΩΣ_ΑΝ (ΑΦΜ MOD 10 = 6) H (ΑΦΜ MOD 10 = 7) ΤΟΤΕ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΜΑΙΟ Η ΤΟΝ ΙΟΥΝΙΟ'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΙΟΥΛΙΟ Η ΤΟΝ ΑΥΓΟΥΣΤΟ'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_6
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΑΦΜ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟΝ ΑΦΜ'
ΔΙΑΒΑΣΕ ΑΦΜ
ΑΝ (ΑΦΜ MOD 10 = 1) H (ΑΦΜ MOD 10 = 2) ΤΟΤΕ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΙΑΝΟΥΑΡΙΟ Η ΤΟΝ ΦΕΒΡΟΥΑΡΙΟ'
ΑΛΛΙΩΣ_ΑΝ (ΑΦΜ MOD 10 = 3) H (ΑΦΜ MOD 10 = 4) ΤΟΤΕ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΜΑΡΤΙΟ Η ΤΟΝ ΑΠΡΙΛΙΟ'
ΑΛΛΙΩΣ_ΑΝ (ΑΦΜ MOD 10 = 6) H (ΑΦΜ MOD 10 = 7) ΤΟΤΕ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΜΑΙΟ Η ΤΟΝ ΙΟΥΝΙΟ'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'ΘΑ ΠΡΕΠΕΙ ΝΑ ΠΕΡΑΣΕΤΕ ΑΠΟ ΤΗΝ ΕΦΟΡΙΑ ΤΟΝ ΙΟΥΛΙΟ Η ΤΟΝ ΑΥΓΟΥΣΤΟ'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 7
Ένα έτος είναι δίσεκτο όταν διαιρείται με το 4 με εξαίρεση εκείνα που διαιρούνται με το 100 με εξαίρεση πάλι εκείνων που διαιρούνται με το 400. Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται τον αριθμό ενός έτους και θα υπολογίζει αν είναι δίσεκτο ή όχι.
Ένα έτος είναι δίσεκτο όταν διαιρείται με το 4 με εξαίρεση εκείνα που διαιρούνται με το 100 με εξαίρεση πάλι εκείνων που διαιρούνται με το 400. Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται τον αριθμό ενός έτους και θα υπολογίζει αν είναι δίσεκτο ή όχι.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_7
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΕΤΟΣ'
ΔΙΑΒΑΣΕ Χ
ΑΝ ((Χ MOD 4 = 0) KAI (X MOD 100< > 0 )) H ( X MOD 400 = 0 ) ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΕΤΟΣ ΕΙΝΑΙ ΔΙΣΕΚΤΟ'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'ΤΟ ΕΤΟΣ ΔΕΝ ΕΙΝΑΙ ΔΙΣΕΚΤΟ'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_7
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΕΤΟΣ'
ΔΙΑΒΑΣΕ Χ
ΑΝ ((Χ MOD 4 = 0) KAI (X MOD 100< > 0 )) H ( X MOD 400 = 0 ) ΤΟΤΕ
ΓΡΑΨΕ 'ΤΟ ΕΤΟΣ ΕΙΝΑΙ ΔΙΣΕΚΤΟ'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'ΤΟ ΕΤΟΣ ΔΕΝ ΕΙΝΑΙ ΔΙΣΕΚΤΟ'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 8
Ένα εστιατόριο παρέχει κάρτα μέλους στους πελάτες του στην οποία προστίθενται πόντοι κάθε φορά που επισκέπτονται το εστιατόριο. Τα οφέλη της κάρτας έχουν ως εξής :
Πάνω από 100 πόντους --- Έκπτωση 15 €
Πάνω από 300 πόντους --- Έκπτωση 25 €
Πάνω από 500 πόντους --- Έκπτωση 40 €
Πάνω από 1000 πόντους --- Δωρεάν γεύμα δυο ατόμων αξίας 80 €.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται το ποσό των πόντων ενός πελάτη και θα εμφανίζει το δώρο του, αν δικαιούται.
Ένα εστιατόριο παρέχει κάρτα μέλους στους πελάτες του στην οποία προστίθενται πόντοι κάθε φορά που επισκέπτονται το εστιατόριο. Τα οφέλη της κάρτας έχουν ως εξής :
Πάνω από 100 πόντους --- Έκπτωση 15 €
Πάνω από 300 πόντους --- Έκπτωση 25 €
Πάνω από 500 πόντους --- Έκπτωση 40 €
Πάνω από 1000 πόντους --- Δωρεάν γεύμα δυο ατόμων αξίας 80 €.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται το ποσό των πόντων ενός πελάτη και θα εμφανίζει το δώρο του, αν δικαιούται.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_8
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Π
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟΥΣ ΠΟΝΤΟΥΣ'
ΔΙΑΒΑΣΕ Π
ΑΝ Π> 1000 ΤΟΤΕ
ΓΡΑΨΕ 'ΔΩΡΕΑΝ ΓΕΥΜΑ ΔΥΟ ΑΤΟΜΩΝ ΑΞΙΑΣ 80 €'
ΑΛΛΙΩΣ_ΑΝ Π > 500 ΤΟΤΕ
ΓΡΑΨΕ ' ΕΚΠΤΩΣΗ 40 €'
ΑΛΛΙΩΣ_ΑΝ Π > 300 ΤΟΤΕ
ΓΡΑΨΕ ' ΕΚΠΤΩΣΗ 25 € '
ΑΛΛΙΩΣ_ΑΝ Π> 100 ΤΟΤΕ
ΓΡΑΨΕ 'ΕΚΠΤΩΣΗ 15 €'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'ΔΕΝ ΥΠΑΡΧΕΙ ΕΚΠΤΩΣΗ'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_8
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Π
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟΥΣ ΠΟΝΤΟΥΣ'
ΔΙΑΒΑΣΕ Π
ΑΝ Π> 1000 ΤΟΤΕ
ΓΡΑΨΕ 'ΔΩΡΕΑΝ ΓΕΥΜΑ ΔΥΟ ΑΤΟΜΩΝ ΑΞΙΑΣ 80 €'
ΑΛΛΙΩΣ_ΑΝ Π > 500 ΤΟΤΕ
ΓΡΑΨΕ ' ΕΚΠΤΩΣΗ 40 €'
ΑΛΛΙΩΣ_ΑΝ Π > 300 ΤΟΤΕ
ΓΡΑΨΕ ' ΕΚΠΤΩΣΗ 25 € '
ΑΛΛΙΩΣ_ΑΝ Π> 100 ΤΟΤΕ
ΓΡΑΨΕ 'ΕΚΠΤΩΣΗ 15 €'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'ΔΕΝ ΥΠΑΡΧΕΙ ΕΚΠΤΩΣΗ'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 9
Να γίνει πρόγραμμα το οποίο θα δέχεται ως είσοδο το μισθό ενός ατόμου και θα υπολογίζει το φόρο που θα πρέπει να πληρώσει. Ο φόρος εξαρτάται απο το εισόδημα, σύμφωνα με τον παρακάτω πίνακα :
Εισόδημα Φόρος
<= 700 5%
700 < ΕΙΣ <= 1200 15 %
1200 < ΕΙΣ <= 2000 25 %
> 2000 35 %
Να γίνει πρόγραμμα το οποίο θα δέχεται ως είσοδο το μισθό ενός ατόμου και θα υπολογίζει το φόρο που θα πρέπει να πληρώσει. Ο φόρος εξαρτάται απο το εισόδημα, σύμφωνα με τον παρακάτω πίνακα :
Εισόδημα Φόρος
<= 700 5%
700 < ΕΙΣ <= 1200 15 %
1200 < ΕΙΣ <= 2000 25 %
> 2000 35 %
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_9
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Φ,ΕΙΣ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΟΣΟ ΤΟΥ ΕΙΣΟΔΗΜΑΤΟΣ'
ΔΙΑΒΑΣΕ ΕΙΣ
ΑΝ ΕΙΣ <=700 ΤΟΤΕ
Φ<-- ΕΙΣ*5/100
ΑΛΛΙΩΣ_ΑΝ ΕΙΣ<= 1200 ΤΟΤΕ
Φ<-- ΕΙΣ*15/100
ΑΛΛΙΩΣ_ΑΝ ΕΙΣ<= 2000 ΤΟΤΕ
Φ<-- ΕΙΣ*25/100
ΑΛΛΙΩΣ
Φ<-- ΕΙΣ*35/100
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΤΟΥ ΦΟΡΟΥ ΕΙΝΑΙ:',Φ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_9
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Φ,ΕΙΣ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΟΣΟ ΤΟΥ ΕΙΣΟΔΗΜΑΤΟΣ'
ΔΙΑΒΑΣΕ ΕΙΣ
ΑΝ ΕΙΣ <=700 ΤΟΤΕ
Φ<-- ΕΙΣ*5/100
ΑΛΛΙΩΣ_ΑΝ ΕΙΣ<= 1200 ΤΟΤΕ
Φ<-- ΕΙΣ*15/100
ΑΛΛΙΩΣ_ΑΝ ΕΙΣ<= 2000 ΤΟΤΕ
Φ<-- ΕΙΣ*25/100
ΑΛΛΙΩΣ
Φ<-- ΕΙΣ*35/100
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ 'ΤΟ ΠΟΣΟ ΤΟΥ ΦΟΡΟΥ ΕΙΝΑΙ:',Φ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Ασκηση 10 - Κλιμακωτή Χρέωση
Μια εταιρία παροχής τεχνικών υπηρεσιών, χρεώνει την επίσκεψη του τεχνικού στους πελάτες της, κλιμακωτά σύμφωνα με τον πίνακα που ακολουθεί παρακάτω. Να πραγματοποιηθεί πρόγραμμα σε γλώσσα προγραμματισμού ΓΛΩΣΣΑ το οποίο:
α. Θα δέχεται τις ώρες που παρέμεινε ο τεχνικός στον πελάτη,
β. Θα υπολογίζει το κόστος της επίσκεψης του τεχνικού
γ. θα εμφανίζει το συμολικό ποσό οφειλής του πελάτη .
Πίνακας Χρέωσης
Ώρες Παραμονής Κόστος ανα ώρα
<=2 20 €
<= 4 15 €
> 4 10 €
Μια εταιρία παροχής τεχνικών υπηρεσιών, χρεώνει την επίσκεψη του τεχνικού στους πελάτες της, κλιμακωτά σύμφωνα με τον πίνακα που ακολουθεί παρακάτω. Να πραγματοποιηθεί πρόγραμμα σε γλώσσα προγραμματισμού ΓΛΩΣΣΑ το οποίο:
α. Θα δέχεται τις ώρες που παρέμεινε ο τεχνικός στον πελάτη,
β. Θα υπολογίζει το κόστος της επίσκεψης του τεχνικού
γ. θα εμφανίζει το συμολικό ποσό οφειλής του πελάτη .
Πίνακας Χρέωσης
Ώρες Παραμονής Κόστος ανα ώρα
<=2 20 €
<= 4 15 €
> 4 10 €
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_10
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Χ,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΙΣ ΩΡΕΣ ΠΑΡΑΜΟΝΗΣ ΤΟΥ ΤΕΧΝΙΚΟΥ'
ΔΙΑΒΑΣΕ Χ
ΑΝ Χ<=2 ΤΟΤΕ
Κ<-- Χ*20
ΑΛΛΙΩΣ_ΑΝ Χ<= 4 ΤΟΤΕ
Κ<-- 2*20 + (Χ-2)*15
ΑΛΛΙΩΣ
Κ<-- 2*20+2*15+(Χ-4)*10
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ 'ΤΟ ΣΥΝΟΛΙΚΌ ΚΟΣΤΟΣ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_10
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ : Χ,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΙΣ ΩΡΕΣ ΠΑΡΑΜΟΝΗΣ ΤΟΥ ΤΕΧΝΙΚΟΥ'
ΔΙΑΒΑΣΕ Χ
ΑΝ Χ<=2 ΤΟΤΕ
Κ<-- Χ*20
ΑΛΛΙΩΣ_ΑΝ Χ<= 4 ΤΟΤΕ
Κ<-- 2*20 + (Χ-2)*15
ΑΛΛΙΩΣ
Κ<-- 2*20+2*15+(Χ-4)*10
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ 'ΤΟ ΣΥΝΟΛΙΚΌ ΚΟΣΤΟΣ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 11 - Κλιμακωτή Χρέωση
Μια εταιρία παράγει δυο προϊόντα,το προϊόν Α και το προϊόν Β. Για το προϊόν Α ακολουθεί την εξής τιμολογιακή πολιτική, για παραγγελίες μέχρι 50 τεμάχια η χρέωση είναι 10 € το τεμάχιο , ενώ για παραγγελίες άνω των 10 τεμαχίων η χρέωση είναι 8 € το τεμάχιο (για όλα τα τεμάχια ). Για το προϊόν Β ισχύει κλιμακωτή χρέωση η οποία έχει ως εξής :
Τεμάχια Κόστος ανα τεμάχιο
<= 10 20 €
<= 20 15 €
<= 30 12 €
> 30 10 €
Να γίνει πρόγραμμα το οποίο θα δέχεται το είδος του προϊόντος ( Α ή Β ) και το πλήθος των τεμαχίων της παραγγελίας και θα υπολογίζει το κόστος της.
Μια εταιρία παράγει δυο προϊόντα,το προϊόν Α και το προϊόν Β. Για το προϊόν Α ακολουθεί την εξής τιμολογιακή πολιτική, για παραγγελίες μέχρι 50 τεμάχια η χρέωση είναι 10 € το τεμάχιο , ενώ για παραγγελίες άνω των 10 τεμαχίων η χρέωση είναι 8 € το τεμάχιο (για όλα τα τεμάχια ). Για το προϊόν Β ισχύει κλιμακωτή χρέωση η οποία έχει ως εξής :
Τεμάχια Κόστος ανα τεμάχιο
<= 10 20 €
<= 20 15 €
<= 30 12 €
> 30 10 €
Να γίνει πρόγραμμα το οποίο θα δέχεται το είδος του προϊόντος ( Α ή Β ) και το πλήθος των τεμαχίων της παραγγελίας και θα υπολογίζει το κόστος της.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_11
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ,Π,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΕΙΔΟΣ ΤΟΥ ΠΡΟΙΟΝΤΟΣ'
ΔΙΑΒΑΣΕ Χ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΛΗΘΟΣ ΤΩΝ ΤΕΜΑΧΙΩΝ'
ΔΙΑΒΑΣΕ Π
ΑΝ Χ='Α' ΤΟΤΕ
ΑΝ Π<=50 ΤΟΤΕ
Κ<--Π*10
ΑΛΛΙΩΣ
Κ<-- Π*8
ΤΕΛΟΣ_ΑΝ
ΑΛΛΙΩΣ
ΑΝ Π<= 10 ΤΟΤΕ
Κ<-- Π*20
ΑΛΛΙΩΣ_ΑΝ Π<=20 ΤΟΤΕ
Κ<-- 10*20+(Π-10)*15
ΑΛΛΙΩΣ_ΑΝ Π<= 30 ΤΟΤΕ
Κ<-- 10*20 + 10*15 + (Π-20)* 12
ΑΛΛΙΩΣ
Κ<-- 10*20 + 10*15 + 10*12 + ( Π-30) *10
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ 'ΤΟ ΣΥΝΟΛΙΚΟ ΚΟΣΤΟΣ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_11
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ,Π,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΕΙΔΟΣ ΤΟΥ ΠΡΟΙΟΝΤΟΣ'
ΔΙΑΒΑΣΕ Χ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΛΗΘΟΣ ΤΩΝ ΤΕΜΑΧΙΩΝ'
ΔΙΑΒΑΣΕ Π
ΑΝ Χ='Α' ΤΟΤΕ
ΑΝ Π<=50 ΤΟΤΕ
Κ<--Π*10
ΑΛΛΙΩΣ
Κ<-- Π*8
ΤΕΛΟΣ_ΑΝ
ΑΛΛΙΩΣ
ΑΝ Π<= 10 ΤΟΤΕ
Κ<-- Π*20
ΑΛΛΙΩΣ_ΑΝ Π<=20 ΤΟΤΕ
Κ<-- 10*20+(Π-10)*15
ΑΛΛΙΩΣ_ΑΝ Π<= 30 ΤΟΤΕ
Κ<-- 10*20 + 10*15 + (Π-20)* 12
ΑΛΛΙΩΣ
Κ<-- 10*20 + 10*15 + 10*12 + ( Π-30) *10
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ 'ΤΟ ΣΥΝΟΛΙΚΟ ΚΟΣΤΟΣ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ