Τετάρτη 16 Δεκεμβρίου 2020
Τετάρτη 9 Δεκεμβρίου 2020
Άσκηση 13.12
Αλγόριθμος cityTel_13_12
"Δώσε τον χρόνο σε δευτερόλεπτα"Διάβασε
χρονοςμισόλεπτα
← χρονος div 30Αν
χρονος mod 30 ≠ 0 τότε !182 δευτερ. = 6 misolepta + 2 δευτερ. μισόλεπτα ← μισόλεπτα + 1 !σε τέτοιες περιπτώσεις,χρεώνω συν 1 μισόλεπτοΤέλος_αν
Αν
χρονος ≤ 180 τότε χρεωση ← μισόλεπτα* 0.09 ! μία τιμή για όλα τα μισόλεπτααλλιώς
χρεωση ← 6* 0.09 + (μισόλεπτα - 6)* 0.065 ! για χρόνο > 3 λεπτών, διαφορετική χρεωσηΤέλος_αν
χρέωση
← χρεωση + (19/100)*χρεωση ! υπολογισμός τελικής χρέωσης, με 19% ΦΠΑΕμφάνισε
"Χρέωση: ", χρεωσηΤέλος
cityTel
Τρίτη 8 Δεκεμβρίου 2020
Άσκηση 13.9
Αλγόριθμος ασκ_13_9
Εμφάνισε "Πληκτρολόγησε τα χιλιόμετρα."
Διάβασε απόσταση
Αν απόσταση > 500 τότε
χρέωση ← 0.40*απόσταση
αλλιώς
χρέωση ← 0.50*απόσταση
Τέλος_αν
χρέωση2 ← χρέωση + 0.3*απόσταση + 40!προσθέτω βενζίνη και ασφάλεια
τελ_χρέωση ← χρεωση2 + χρέωση2*19/100 ! πρασαύξηση ΦΠΑ
Εμφάνισε "Η χρέωση είναι", τελ_χρέωση
Τέλος ασκ_13_9
Άσκηση 13.10
Αλγόριθμος Ασκ_13_10
Εμφάνισε "Πληκτρολόγησε Όνομα και ημέρες"
Διάβασε Ονομα, ημέρες
μικτές ← ημέρες* 70
Αν μικτές > 1200 τότε
καθαρές ← μικτές - μικτές*(11 + 8.5)/100
αλλιώς
καθαρές ← μικτές - μικτές* 11/100
Τέλος_αν
Εμφάνισε "Οι καθαρές αποδοχές είναι: ", καθαρές
Τέλος Ασκ_13_10
Τετάρτη 2 Δεκεμβρίου 2020
Άσκηση 13.8
Αλγόριθμος ασκ_13_8
Εμφάνισε
"Πληκτρολόγησε απόσταση "Διάβασε
απόστασηΑν
απόσταση < 40 τότε χρεωση ← απόσταση* 0.18αλλιώς
χρεωση ← 5 + απόσταση* 0.14Τέλος_αν
τελ_χρέωση
← χρεωση + 1.5 !η κλήση χρεώνεται ανεξαρτήτως απόστασηςΕμφάνισε
"Η τελική χρέωση είναι ", τελ_χρέωσηΤέλος
ασκ_13_8
Άσκηση 13.7
ασκ_13_7Εμφάνισε
"Πληκτρολόγησε χρονική διάρκεια στάθμευσης"Διάβασε
χρ_διάρκειαΑν
χρ_διάρκεια > 4 τότε χρεωση ← χρ_διάρκεια* 8.5αλλιώς
χρεωση ← χρ_διάρκεια* 9.5Τέλος_αν
Τελ_χρεωση
← χρεωση + (19/100)*χρεωση !υπολογισμος ΦΠΑΕμφάνισε
"Η τελική χρέωση είναι ", Τελ_χρεωσηΤέλος ασκ_13_7
Πέμπτη 26 Νοεμβρίου 2020
Άσκηση 12.22
Αλγόριθμος ασκ_12_22 (α' Τρόπος)
Εμφάνισε "Πληκτρολογήστε τις 3 θερμοκρασίες "Διάβασε θ1, θ2, θ3
ΜΟ ← (θ1 + θ2 + θ3)/3
Αν ΜΟ < 12 ή θ1 < 10 ή θ2 < 10 ή θ3 < 10 τότε
Εμφάνισε "Ενεργοποιήστε Κλιματισμό"
αλλιώς
Εμφάνισε "Μην Ενεργοποιήσετε Κλιματισμό"
Τέλος_αν
Τέλος ασκ_12_22
Άσκηση 12.18
Αλγόριθμος ασκ_12_18
Εμφάνισε "Πληκτρολογήστε αριθμό"
Διάβασε αρ
Αν αρ mod 2 = 0 τότε Εμφάνισε "Άρτιος"
αλλιώς Εμφάνισε "Περιττός"
Τέλος_αν
Τέλος ασκ_12_18
Η λύση της άσκησης σε μορφή Διαγράμματος Ροής...
Τρίτη 24 Νοεμβρίου 2020
Άσκηση 11.15
Αλγόριθμος ασκ_11_15
Εμφάνισε "Πληκτρολογήστε πλήθος των ατόμων"Διάβασε άτομα
Αριθμός_Λεωφ ← άτομα div 45 ! Ένα λεωφορείο ανά 45 άτομα....
Αν άτομα mod 45 > 0 τότε
Αριθμός_Λεωφ ← Αριθμός_Λεωφ + 1!...συν ένα λεωφορείο γι αυτούς που περισεύουν!
Τέλος_αν
Κόστος_Λεωφ ← Αριθμός_Λεωφ* 280 ! Κόστος Λεωφορείων
Κόστος_κινημ ← (άτομα* 7) - (15/100)*(άτομα* 7)! Κόστος Κινηματογράφου
Σύνολο ← Κόστος_Λεωφ + Κόστος_κινημ
Εμφάνισε "Συνολικό κόστος: ", Σύνολο
Τέλος ασκ_11_15
Άσκηση 11.11
Αλγόριθμος ασκ_11_11
Εμφάνισε "Πληκτρολογήστε αριθμό των DVD, των VHS, και μέρες που κρατήθηκαν"
Διάβασε DVD, VHS, Μέρες
Κόστος ← ( DVD*2.5 + VHS*1.5)* Μέρες
Αν Μέρες > 2 τότε !προσαύξηση 30% μόνο Αν κρατήθηκαν πάνω από 2 μέρες
Κόστος ← Κόστος + (30/100)* Κόστος ! υπολογισμός προσαύξησης
Τέλος_αν
Εμφάνισε "Συνολικό κόστος: ", Κόστος
Τέλος ασκ_11_11
Τρίτη 17 Νοεμβρίου 2020
Άσκηση 11.10
Αλγόριθμος ask_11_10
Εμφάνισε "Πληκτρολογήστε Πλήθος Λεωφορείων και Συμμετέχοντες"
Διάβασε πλ_λεωφ, πλ_συμμ
Ποσό ← πλ_λεωφ* 70 + πλ_συμμ* 25
Αν Ποσό > 500 τότε
Ποσό ← Ποσό - (10/100)* Ποσό !ΕΚΠΤΩΣΗ 10%
Τέλος_αν
Εμφάνισε "ΠΛΗΡΩΤΕΟ ΠΟΣΟ:", Ποσό
Τέλος ask_11_10

