ΔΤ1. Αν η μεταβλητή Α έχει την τιμή 10, η μεταβλητή Β έχει την τιμή 5 και η μεταβλητή Γ έχει την τιμή 3, ποιες από τις παρακάτω εκφράσεις είναι αληθείς και ποιες ψευδείς.
Α) Όχι (Α > Β)
Β) Α > Β ΚΑΙ Α<Γ Η Γ<=Β
Γ) Α > Β ΚΑΙ (Α < Γ Η Γ <= Β)
Δ) Α = Β Η (Γ – Β) < 0
Ε) (Α > Β ΚΑΙ Γ< Β) Η (Β <> Γ ΚΑΙ Α < Γ)
Α. Ψευδής
Β. Αληθής
Γ. Αληθής
Δ. Αληθής
Ε. Αληθής
ΔΤ2. Να γράψεις τις εντολές για τα παρακάτω:
Α. Αν η βαθμολογία (ΒΑΘΜΟΣ) είναι μεγαλύτερη από το μέσο όρο (ΜΟ) τότε να τυπώνει «Πολύ καλά», αν είναι ίση ή μικρότερη του Μέσου όρου μέχρι και 2 μονάδες να τυπώνει «Καλά» και όταν είναι μικρότερη του Μέσου όρου περισσότερο από 2 μονάδες, να τυπώνει «Μέτρια»
Β. Αν το τμήμα (ΤΜΗΜΑ) είναι Γ1 και η βαθμολογία (ΒΑΘΜΟΣ) είναι μεγαλύτερη από 15, τότε να τυπώνει το επώνυμο (ΕΠΩΝΥΜΟ)
Γ. Αν η απάντηση (ΑΠΑΝΤΗΣΗ) δεν είναι Ν ή ν ή Ο ή ο, τότε να τυπώνει το μήνυμα «Λάθος απάντηση…»
Δ. Αν ο αριθμός Χ είναι αρνητικός ή το ΗΜ(Χ)=0, τότε να τυπώνεται το μήνυμα «Λάθος δεδομένα..», Αλλιώς να υπολογίζεται η παράσταση (Χ^2+5*Χ)/(Τ_Ρ(Χ)*ΗΜ(Χ))
|
Α. |
ΑΝ ΒΑΘΜΟΣ > ΜΟ ΤΟΤΕ ΓΡΑΨΕ 'Πολύ καλά' ΑΛΛΙΩΣ_ΑΝ ΒΑΘΜΟΣ >= (ΜΟ - 2) ΤΟΤΕ ΓΡΑΨΕ 'Καλά' ΑΛΛΙΩΣ ΓΡΑΨΕ 'Μέτρια' ΤΕΛΟΣ_ΑΝ |
|
Β. |
ΑΝ (ΤΜΗΜΑ = 'Γ1') ΚΑΙ (ΒΑΘΜΟΣ > 15) ΤΟΤΕ ΓΡΑΨΕ ΕΠΩΝΥΜΟ ΤΕΛΟΣ_ΑΝ |
|
Γ. |
ΑΝ (ΑΠΑΝΤΗΣΗ <> 'ν') KAI (ΑΠΑΝΤΗΣΗ <> 'Ν') KAI (ΑΠΑΝΤΗΣΗ <> 'ο') KAI (ΑΠΑΝΤΗΣΗ <> 'Ο') ΤΟΤΕ ΓΡΑΨΕ 'Λάθος απάντηση...' ΤΕΛΟΣ_ΑΝ |
|
Δ. |
ΑΝ (Χ <= 0) Η (ΗΜ(Χ) = 0) ΤΟΤΕ ΓΡΑΨΕ 'Λάθος δεδομένα...' ΑΛΛΙΩΣ Υ <- (Χ ^ 2 + 5 * Χ) / (Τ_Ρ(Χ) * ΗΜ(Χ)) ΤΕΛΟΣ_ΑΝ |
ΔΤ3. Τι αλλαγές πρέπει να γίνουν στο πρόγραμμα του παραδείγματος 1 ώστε να τυπώνει και ποιος από τους δύο ρύπους υπερέβη τα όρια λήψης μέτρων;
ΑΝ ΝΟ2 > 700 ΤΟΤΕ ΓΡΑΨΕ 'Πάρα πολύ υψηλοί ρύποι,απαγόρευση κυκλοφορίας' ΓΡΑΨΕ 'Άζωτο πάνω από τα όρια' ΑΛΛΙΩΣ_ΑΝ ΝΟ2 > 500 ΤΟΤΕ ΓΡΑΨΕ 'Πολύ υψηλοί ρύποι, έκτακτα μέτρα' ΓΡΑΨΕ 'Άζωτο πάνω από τα όρια' ΑΛΛΙΩΣ ΓΡΑΨΕ 'Προσοχή υψηλοί ρύποι' ΓΡΑΨΕ 'Άζωτο πάνω απο τα όρια' ΤΕΛΟΣ_ΑΝ ΑΝ Ο3 > 500 ΤΟΤΕ ΓΡΑΨΕ 'Πάρα πολύ υψηλοί ρύποι, απαγόρευση κυκλοφορίας' ΓΡΑΨΕ 'Όζον πάνω από τα όρια' ΑΛΛΙΩΣ_ΑΝ ΝΟ2 > 500 ΤΟΤΕ ΓΡΑΨΕ 'Πολύ υψηλοί ρύποι, έκτακτα μέτρα' ΓΡΑΨΕ 'Όζον πάνω από τα όρια' ΑΛΛΙΩΣ ΓΡΑΨΕ 'Υψηλοί ρύποι' ΓΡΑΨΕ 'Όζον πάνω από τα όρια' ΤΕΛΟΣ_ΑΝ ΔΣ1 ΠΡΟΓΡΑΜΜΑ Φορολογία ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: ΑΦΜ ΠΡΑΓΜΑΤΙΚΕΣ: φόρος, εισόδημα ΧΑΡΑΚΤΗΡΕΣ: όνομα ΑΡΧΗ ΔΙΑΒΑΣΕ ΑΦΜ, όνομα, εισόδημα ΑΝ εισόδημα <= 1055000 ΤΟΤΕ φόρος <- 0 ΑΛΛΙΩΣ_ΑΝ εισόδημα <= (1055000 + 1582500) ΤΟΤΕ φόρος <- 0.05*(εισόδημα - 1055000) ΑΛΛΙΩΣ_ΑΝ εισόδημα <= (1055000 + 1582500 + 1582500) ΤΟΤΕ φόρος <- 79125 + 0.15*(εισόδημα - (1055000 + 1582500)) ΑΛΛΙΩΣ_ΑΝ εισόδημα <= (1055000 + 1582500 + 1582500 + 3165000) ΤΟΤΕ φόρος <- 316500 + 0.30*(εισόδημα - (1055000 + 1582500 + 1582500)) ΑΛΛΙΩΣ_ΑΝ εισόδημα <= (1055000 + 1582500 + 1582500 + 3165000 + 8440000) ΤΟΤΕ φόρος <- 1266000 + 0.40*(εισόδημα - (1055000 + 1582500 + 1582500 + 3165000)) ΑΛΛΙΩΣ φόρος <- 4642000 + 0.45*(εισόδημα - (1055000 + 1582500 + 1582500 + 3165000 + 8440000)) ΤΕΛΟΣ_ΑΝ ΓΡΑΨΕ 'Ο φορολογούμενος με όνομα', όνομα, ' θα πληρώσει', φόρος ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΔΣ2 ΠΡΟΓΡΑΜΜΑ Επίλυση_δευτεροβάθμιας_εξίσωσης ΜΕΤΑΒΛΗΤΕΣ ΠΡΑΓΜΑΤΙΚΕΣ: Α, Β, Γ, Δ ΑΡΧΗ ΓΡΑΨΕ 'Δώσε το συντελεστή Α:' ΔΙΑΒΑΣΕ Α ΓΡΑΨΕ 'Δώσε το συντελεστή Β:' ΔΙΑΒΑΣΕ Β ΓΡΑΨΕ 'Δώσε το συντελεστή Γ:' ΔΙΑΒΑΣΕ Γ ΑΝ Α <> 0 ΤΟΤΕ Δ <- Β^2 - 4*Α*Γ ΑΝ Δ < 0 ΤΟΤΕ ΓΡΑΨΕ 'Η εξίσωση είναι ΑΔΥΝΑΤΗ' ΑΛΛΙΩΣ_ΑΝ Δ > 0 ΤΟΤΕ ΓΡΑΨΕ 'Η εξίσωση έχει ΔΥΟ ΡΙΖΕΣ:' ΓΡΑΨΕ 'Ρ1 = ', (-Β + Τ_Ρ(Δ))/(2*Α) ΓΡΑΨΕ 'Ρ2 = ', (-Β - Τ_Ρ(Δ))/(2*Α) ΑΛΛΙΩΣ ΓΡΑΨΕ 'Η εξίσωση έχει ΜΙΑ ΔΙΠΛΗ ΡΙΖΑ:' ΓΡΑΨΕ 'Ρ = ', -Β/(2*Α) ΤΕΛΟΣ_ΑΝ ΑΛΛΙΩΣ ΑΝ Β <> 0 ΤΟΤΕ ΓΡΑΨΕ 'Η εξίσωση έχει ΜΙΑ ΡΙΖΑ:' ΓΡΑΨΕ 'Ρ = ', -Γ/Β ΑΛΛΙΩΣ ΑΝ Γ <> 0 ΤΟΤΕ ΓΡΑΨΕ 'Η εξίσωση είναι ΑΔΥΝΑΤΗ' ΑΛΛΙΩΣ ΓΡΑΨΕ 'Η εξίσωση είναι ΑΟΡΙΣΤΗ' ΤΕΛΟΣ_ΑΝ ΤΕΛΟΣ_ΑΝ ΤΕΛΟΣ_ΑΝ ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Επίλυση_δευτεροβάθμιας_εξίσωσης ΔΣ3 ΠΡΟΓΡΑΜΜΑ Υπολογισμός_ΜΟ ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: βαθμός, άθροισμα, πλήθος ΠΡΑΓΜΑΤΙΚΕΣ: ΜΟ ΧΑΡΑΚΤΗΡΕΣ: όνομα ΑΡΧΗ ΔΙΑΒΑΣΕ όνομα ΟΣΟ (όνομα <> ' ') ΕΠΑΝΑΛΑΒΕ άθροισμα <- 0 πλήθος <- 0 ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΔΙΑΒΑΣΕ βαθμός πλήθος <- πλήθος + 1 άθροισμα <- άθροισμα + βαθμός ΜΕΧΡΙΣ_ΟΤΟΥ πλήθος = 3 ΜΟ <- άθροισμα/ 3 ΓΡΑΨΕ 'Ο μέσος όρος είναι: ', ΜΟ ΔΙΑΒΑΣΕ όνομα ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΔΣ5 ΠΡΟΓΡΑΜΜΑ Τριγωνομετρία ΣΤΑΘΕΡΕΣ όριο = 0.00001 π = 3.14 ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: γωνία_μοίρες ΠΡΑΓΜΑΤΙΚΕΣ: γωνία, παρονομαστής, ημίτονο, συνημίτονο, νέος_όρος ΑΚΕΡΑΙΕΣ: i, Ν, k ΑΡΧΗ ΔΙΑΒΑΣΕ γωνία_μοίρες γωνία <- γωνία_μοίρες* π/ 180 ημίτονο <- γωνία i <- 1 Ν <- 3 ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ παρονομαστής <- 1 k <- 1 ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ παρονομαστής <- παρονομαστής* k k <- k + 1 ΜΕΧΡΙΣ_ΟΤΟΥ k = Ν + 1 νέος_όρος <- (-1)^ i* γωνία^ Ν/ παρονομαστής ημίτονο <- ημίτονο + νέος_όρος i <- i + 1 Ν <- Ν + 2 ΜΕΧΡΙΣ_ΟΤΟΥ Α_Τ(νέος_όρος) < όριο συνημίτονο <- 1 i <- 1 Ν <- 2 ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ παρονομαστής <- 1 k <- 1 ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ παρονομαστής <- παρονομαστής* k k <- k + 1 ΜΕΧΡΙΣ_ΟΤΟΥ k = Ν + 1 νέος_όρος <- (-1)^ i* γωνία^ Ν/ παρονομαστής συνημίτονο <- συνημίτονο + νέος_όρος i <- i + 1 Ν <- Ν + 2 ΜΕΧΡΙΣ_ΟΤΟΥ Α_Τ (νέος_όρος) < όριο ΓΡΑΨΕ 'Το ημίτονο είναι ', ημίτονο ΓΡΑΨΕ 'Το συνημίτονο είναι ', συνημίτονο ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΔΕ2 ΠΡΟΓΡΑΜΜΑ ΡΩΣΙΚΟΣ_ΠΟΛΛ ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: Αριθμός1, Αριθμός2, Αποτέλεσμα ΑΡΧΗ ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ 'Εισάγετε 2 ακέραιους θετικούς αριθμούς' ΔΙΑΒΑΣΕ Αριθμός1, Αριθμός2 ΜΕΧΡΙΣ_ΟΤΟΥ Αριθμός1 > 0 ΚΑΙ Αριθμός2 > 0 Αποτέλεσμα <- 0 ΟΣΟ (Αριθμός2 > 0) ΕΠΑΝΑΛΑΒΕ ΑΝ (Αριθμός2 mod 2 = 1) ΤΟΤΕ Αποτέλεσμα <- Αποτέλεσμα + Αριθμός1 ΤΕΛΟΣ_ΑΝ Αριθμός1 <- Αριθμός1* 2 Αριθμός2 <- Αριθμός2 div 2 ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ 'Το αποτέλεσμα είναι: ', Αποτέλεσμα ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΔΕ5 ΠΡΟΓΡΑΜΜΑ Πυκνωτές_Αντιστάσεις ΜΕΤΑΒΛΗΤΕΣ ΑΚΕΡΑΙΕΣ: i, επιλογή, πλήθος_πυκνωτών, πλήθος_αντιστάσεων ΠΡΑΓΜΑΤΙΚΕΣ: συν_πυκνωτές, συν_αντιστάσεις, πυκνωτής, αντίσταση ΑΡΧΗ ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ "Μενού επιλογών" ΓΡΑΨΕ "1. Σύνδεση αντιστάσεων" ΓΡΑΨΕ "2. Σύνδεση πυκνωτών" ΓΡΑΨΕ "3. Έξοδος" ΓΡΑΨΕ "Δώσε επιλογή: " ΔΙΑΒΑΣΕ επιλογή ΜΕΧΡΙΣ_ΟΤΟΥ (επιλογή = 1) Η (επιλογή = 2) Η (επιλογή = 3) ΑΝ επιλογή = 1 ΤΟΤΕ ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ "1. Παράλληλη σύνδεση" ΓΡΑΨΕ "2. Σύνδεση σε σειρά" ΓΡΑΨΕ "Δώσε επιλογή: " ΔΙΑΒΑΣΕ επιλογή ΜΕΧΡΙΣ_ΟΤΟΥ (επιλογή = 1) Η (επιλογή = 2) ΑΝ επιλογή = 1 ΤΟΤΕ ΓΡΑΨΕ "Δώσε πλήθος_αντιστάσεων" ΔΙΑΒΑΣΕ πλήθος_αντιστάσεων συν_αντιστάσεις <- 0 ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλήθος_αντιστάσεων ΓΡΑΨΕ "Δώσε τιμή αντίστασης" ΔΙΑΒΑΣΕ αντίσταση συν_αντιστάσεις <- συν_αντιστάσεις + 1/ αντίσταση ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ 'Συνολική αντίσταση: ', συν_αντιστάσεις ΑΛΛΙΩΣ ΓΡΑΨΕ "Δώσε πλήθος_αντιστάσεων" ΔΙΑΒΑΣΕ πλήθος_αντιστάσεων συν_αντιστάσεις <- 0 ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλήθος_αντιστάσεων ΓΡΑΨΕ "Δώσε τιμή αντίστασης" ΔΙΑΒΑΣΕ αντίσταση συν_αντιστάσεις <- συν_αντιστάσεις + αντίσταση ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ 'Συνολική αντίσταση: ', συν_αντιστάσεις ΤΕΛΟΣ_ΑΝ ΑΛΛΙΩΣ_ΑΝ επιλογή = 2 ΤΟΤΕ ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ "1. Παράλληλη σύνδεση" ΓΡΑΨΕ "2. Σύνδεση σε σειρά" ΓΡΑΨΕ "Δώσε επιλογή: " ΔΙΑΒΑΣΕ επιλογή ΜΕΧΡΙΣ_ΟΤΟΥ (επιλογή = 1) Η (επιλογή = 2) ΓΡΑΨΕ "Δώσε πλήθος_πυκνωτών" ΔΙΑΒΑΣΕ πλήθος_πυκνωτών ΑΝ επιλογή = 1 ΤΟΤΕ συν_πυκνωτές <- 0 ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλήθος_πυκνωτών ΓΡΑΨΕ "Δώσε τιμή πυκνωτή" ΔΙΑΒΑΣΕ πυκνωτής συν_πυκνωτές <- συν_πυκνωτές + πυκνωτής ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ 'Συνολικός πυκνωτής: ', συν_πυκνωτές ΑΛΛΙΩΣ συν_πυκνωτές <- 0 ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ πλήθος_πυκνωτών ΓΡΑΨΕ "Δώσε τιμή πυκνωτή" ΔΙΑΒΑΣΕ πυκνωτής συν_πυκνωτές <- συν_πυκνωτές + 1/πυκνωτής ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ ΓΡΑΨΕ 'Συνολικός πυκνωτής: ', συν_πυκνωτές ΤΕΛΟΣ_ΑΝ ΑΛΛΙΩΣ ΓΡΑΨΕ 'εξοδος' ΤΕΛΟΣ_ΑΝ ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ