Ασκήσεις στη Δομή Ακολουθίας
Λύσεις Ασκήσεων
Ανάπτυξη Εφαρμογών σε Προγραμματιστικό Περιβάλλον
Παρακάτω θα βρείτε ενδεικτικές λύσεις για τις ασκήσεις στη δομή της ακολουθίας.
Η δομή της ακολουθίας.
Η δομή της ακολουθίας είναι η πιο απλή απο τις τρείς δομές που χρησιμοποιούνται στο δομημένο προγραμματισμό. Στη δομή αυτή η σειρά των εντολών που περιγράφονται είναι συγκεκριμένη και οι εντολές εκτελούνται όλες , η μία μετά την άλλη ακολουθιακά.
Άσκηση 1
Να γραφεί πρόγραμμα ανάγνωσης δύο πραγματικών αριθμών. Στη συνέχεια να εμφανιστεί το άθροισμά τους και το γινόμενό τους.
Να γραφεί πρόγραμμα ανάγνωσης δύο πραγματικών αριθμών. Στη συνέχεια να εμφανιστεί το άθροισμά τους και το γινόμενό τους.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_1
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Α,Β,ΑΘΡ,ΓΙΝ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΔΥΟ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β
ΑΘΡ<--Α+Β
ΓΙΝ<--Α*Β
ΓΡΑΨΕ 'ΤΟ ΑΘΡΟΙΣΜΑ ΕΙΝΑΙ:',ΑΘΡ
ΓΡΑΨΕ 'ΤΟ ΓΙΝΟΜΕΝΟ ΕΙΝΑΙ:',ΓΙΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_1
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Α,Β,ΑΘΡ,ΓΙΝ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΔΥΟ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β
ΑΘΡ<--Α+Β
ΓΙΝ<--Α*Β
ΓΡΑΨΕ 'ΤΟ ΑΘΡΟΙΣΜΑ ΕΙΝΑΙ:',ΑΘΡ
ΓΡΑΨΕ 'ΤΟ ΓΙΝΟΜΕΝΟ ΕΙΝΑΙ:',ΓΙΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 2
Να διαβαστεί πραγματικός αριθμός και να υπολογιστεί & να εκτυπωθεί ο κύβος του μισού του.
Να διαβαστεί πραγματικός αριθμός και να υπολογιστεί & να εκτυπωθεί ο κύβος του μισού του.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_2
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Α,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Κ<-- (Χ^3)/2
ΓΡΑΨΕ 'Ο ΚΥΒΟΣ ΤΟΥ ΜΙΣΟΥ ΤΟΥ:',Χ,' ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_2
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Α,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Κ<-- (Χ^3)/2
ΓΡΑΨΕ 'Ο ΚΥΒΟΣ ΤΟΥ ΜΙΣΟΥ ΤΟΥ:',Χ,' ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 3
Να γραφεί πρόγραμμα για τον υπολογισμό της παράστασης με πραγματικούς αριθμούς: Υ = (Χ/(Χ+1)-1/(Χ+3))
Να γραφεί πρόγραμμα για τον υπολογισμό της παράστασης με πραγματικούς αριθμούς: Υ = (Χ/(Χ+1)-1/(Χ+3))
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_3
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Υ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΤΗΣ ΜΕΤΑΒΛΗΤΗΣ Χ'
ΔΙΑΒΑΣΕ Χ
Υ<--(Χ/(Χ+1)-1/(Χ+3))
ΓΡΑΨΕ 'ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:',Υ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_3
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Υ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΤΗΣ ΜΕΤΑΒΛΗΤΗΣ Χ'
ΔΙΑΒΑΣΕ Χ
Υ<--(Χ/(Χ+1)-1/(Χ+3))
ΓΡΑΨΕ 'ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:',Υ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 4
Να γίνει πρόγραμμα που θα δέχεται έναν τετραψήφιο ακέραιο και θα υπολογίζει το άθροισμα των ψηφίων του.
Να γίνει πρόγραμμα που θα δέχεται έναν τετραψήφιο ακέραιο και θα υπολογίζει το άθροισμα των ψηφίων του.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_4
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ,Α,Β,Γ,Δ,Σ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΤΕΤΡΑΨΗΦΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Α<-- X MOD 10
X<-- X DIV 10
B<-- X MOD 10
X<-- X DIV 10
Γ<-- X MOD 10
X<-- X DIV 10
Δ<-- X MOD 10
Σ<-- Α+Β+Γ+Δ
ΓΡΑΨΕ 'ΤΟ ΑΘΡΟΙΣΜΑ ΤΩΝ ΨΗΦΙΩΝ ΤΟΥ ΕΙΝΑΙ:',Σ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_4
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ,Α,Β,Γ,Δ,Σ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΤΕΤΡΑΨΗΦΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Α<-- X MOD 10
X<-- X DIV 10
B<-- X MOD 10
X<-- X DIV 10
Γ<-- X MOD 10
X<-- X DIV 10
Δ<-- X MOD 10
Σ<-- Α+Β+Γ+Δ
ΓΡΑΨΕ 'ΤΟ ΑΘΡΟΙΣΜΑ ΤΩΝ ΨΗΦΙΩΝ ΤΟΥ ΕΙΝΑΙ:',Σ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 5
Να γίνει πρόγραμμα που να υπολογίζει την παράσταση πραγματικών αριθμών: Υ = (3|Χ|/(Ζ+2))-7
Να γίνει πρόγραμμα που να υπολογίζει την παράσταση πραγματικών αριθμών: Υ = (3|Χ|/(Ζ+2))-7
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_5
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Υ,Ζ,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΙΣ ΤΙΜΕΣ ΤΩΝ Χ,Ζ'
ΔΙΑΒΑΣΕ Χ,Ζ
Κ<-- 3*Α_Τ(Χ)/(Ζ+2)-7
ΓΡΑΨΕ 'ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_5
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Υ,Ζ,Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΙΣ ΤΙΜΕΣ ΤΩΝ Χ,Ζ'
ΔΙΑΒΑΣΕ Χ,Ζ
Κ<-- 3*Α_Τ(Χ)/(Ζ+2)-7
ΓΡΑΨΕ 'ΤΟ ΑΠΟΤΕΛΕΣΜΑ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 6
Να πραγματοποιηθεί πρόγραμμα το οποίο θα δέχεται τρεις αριθμούς από το πληκτρολόγιο και θα υπολογίζει το μέσο όρο τους.
Να πραγματοποιηθεί πρόγραμμα το οποίο θα δέχεται τρεις αριθμούς από το πληκτρολόγιο και θα υπολογίζει το μέσο όρο τους.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_6
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Α,Β,Γ,Μ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΡΕΙΣ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β,Γ
Μ<--(Α+Β+Γ)/3
ΓΡΑΨΕ ' Ο ΜΕΣΟΣ ΟΡΟΣ ΕΙΝΑΙ:',Μ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_6
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Α,Β,Γ,Μ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΡΕΙΣ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β,Γ
Μ<--(Α+Β+Γ)/3
ΓΡΑΨΕ ' Ο ΜΕΣΟΣ ΟΡΟΣ ΕΙΝΑΙ:',Μ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 7
Να γραφεί πρόγραμμα το οποίο θα δέχεται έναν αριθμό και θα εμφανίζει το τελευταίο ψηφίο του.
Να γραφεί πρόγραμμα το οποίο θα δέχεται έναν αριθμό και θα εμφανίζει το τελευταίο ψηφίο του.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_7
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ,Τ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Τ<-- Χ MOD 10
ΓΡΑΨΕ 'ΤΟ ΤΕΛΕΥΤΑΙΟ ΨΗΦΙΟ ΤΟΥ:',Χ,' ΕΙΝΑΙ', Τ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_7
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ,Τ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Τ<-- Χ MOD 10
ΓΡΑΨΕ 'ΤΟ ΤΕΛΕΥΤΑΙΟ ΨΗΦΙΟ ΤΟΥ:',Χ,' ΕΙΝΑΙ', Τ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 8
Ο ιδιοκτήτης ενός καταστήματος ρούχων αποφάσισε να πραγματοποιήσει έκπτωση 20% σε όλα τα προϊόντα. Να γράψετε πρόγραμμα το οποίο θα δέχεται ως είσοδο την αρχική τιμή του προϊόντος και θα εμφανίζει την τελική του τιμή , αφού πραγματοποιήσει την έκπτωση.
Ο ιδιοκτήτης ενός καταστήματος ρούχων αποφάσισε να πραγματοποιήσει έκπτωση 20% σε όλα τα προϊόντα. Να γράψετε πρόγραμμα το οποίο θα δέχεται ως είσοδο την αρχική τιμή του προϊόντος και θα εμφανίζει την τελική του τιμή , αφού πραγματοποιήσει την έκπτωση.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_8
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Τ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΑΡΧΙΚΗ ΤΙΜΗ ΤΟΥ ΠΡΟΙΟΝΤΟΣ'
ΔΙΑΒΑΣΕ Χ
Τ<-- Χ-Χ*20/100
ΓΡΑΨΕ ' Η ΤΕΛΙΚΗ ΤΙΜΗ ΕΙΝΑΙ:',Τ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_8
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,Τ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΑΡΧΙΚΗ ΤΙΜΗ ΤΟΥ ΠΡΟΙΟΝΤΟΣ'
ΔΙΑΒΑΣΕ Χ
Τ<-- Χ-Χ*20/100
ΓΡΑΨΕ ' Η ΤΕΛΙΚΗ ΤΙΜΗ ΕΙΝΑΙ:',Τ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 9
Σε ένα παιδικό θέατρο τα εισιτήρια κοστίζουν 10 € για τους ενήλικες και 5 € για τα παιδιά. Να πραγματοποιήσετε πρόγραμμα το οποίο θα δέχεται το πλήθος των ενηλίκων και παιδιών που παρακολούθησαν μια παράσταση και θα εμφανίζει τις συνολικές εισπράξεις του θεάτρου.
Σε ένα παιδικό θέατρο τα εισιτήρια κοστίζουν 10 € για τους ενήλικες και 5 € για τα παιδιά. Να πραγματοποιήσετε πρόγραμμα το οποίο θα δέχεται το πλήθος των ενηλίκων και παιδιών που παρακολούθησαν μια παράσταση και θα εμφανίζει τις συνολικές εισπράξεις του θεάτρου.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_9
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΠΕ,Π,Σ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΛΗΘΟΣ ΕΝΗΛΙΚΩΝ ΚΑΙ ΠΑΙΔΙΩΝ ΠΟΥ ΠΑΡΑΚΟΛΟΥΘΗΣΑΝ ΤΗΝ ΠΑΡΑΣΤΑΣΗ'
ΔΙΑΒΑΣΕ ΠΕ,Π
Σ<--ΠΕ*10+Π*5
ΓΡΑΨΕ 'ΟΙ ΣΥΝΟΛΙΚΕΣ ΕΙΣΠΡΑΞΕΙΣ ΗΤΑΝ:',Σ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_9
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΠΕ,Π,Σ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΛΗΘΟΣ ΕΝΗΛΙΚΩΝ ΚΑΙ ΠΑΙΔΙΩΝ ΠΟΥ ΠΑΡΑΚΟΛΟΥΘΗΣΑΝ ΤΗΝ ΠΑΡΑΣΤΑΣΗ'
ΔΙΑΒΑΣΕ ΠΕ,Π
Σ<--ΠΕ*10+Π*5
ΓΡΑΨΕ 'ΟΙ ΣΥΝΟΛΙΚΕΣ ΕΙΣΠΡΑΞΕΙΣ ΗΤΑΝ:',Σ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 10
Να δημιουργήσετε πρόγραμμα το οποίο θα δέχεται μια τιμή σε ευρώ και θα την μετατρέπει σε δραχμές. ( Δίνεται η ισοτιμία 1€ = 340,75 ΔΡΧ).
Να δημιουργήσετε πρόγραμμα το οποίο θα δέχεται μια τιμή σε ευρώ και θα την μετατρέπει σε δραχμές. ( Δίνεται η ισοτιμία 1€ = 340,75 ΔΡΧ).
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_10
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: ΔΡΧ,ΕΥΡΩ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΣΕ ΕΥΡΩ'
ΔΙΑΒΑΣΕ ΕΥΡΩ
ΔΡΧ<--ΕΥΡΩ*340.75
ΓΡΑΨΕ 'Η ΤΙΜΗ ΣΕ ΔΡΑΧΜΕΣ ΕΙΝΑΙ:',ΔΡΧ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_10
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: ΔΡΧ,ΕΥΡΩ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΣΕ ΕΥΡΩ'
ΔΙΑΒΑΣΕ ΕΥΡΩ
ΔΡΧ<--ΕΥΡΩ*340.75
ΓΡΑΨΕ 'Η ΤΙΜΗ ΣΕ ΔΡΑΧΜΕΣ ΕΙΝΑΙ:',ΔΡΧ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 11
Να δημιουργήσετε πρόγραμμα το οποίο θα δέχεται μια τιμή σε ευρώ και την τρέχουσα ισοτιμία ευρώ δολαρίου και θα εμφανίζει την αντίστοιχη τιμή σε δολάρια.
Να δημιουργήσετε πρόγραμμα το οποίο θα δέχεται μια τιμή σε ευρώ και την τρέχουσα ισοτιμία ευρώ δολαρίου και θα εμφανίζει την αντίστοιχη τιμή σε δολάρια.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_11
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: ΔΡΧ,ΔΟΛ,ΙΣΟΤ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΣΕ ΕΥΡΩ ΚΑΙ ΤΗΝ ΙΣΟΤΙΜΙΑ'
ΔΙΑΒΑΣΕ ΕΥΡΩ,ΙΣΟΤ
ΔΟΛ<--ΕΥΡΩ*ΙΣΟΤ
ΓΡΑΨΕ 'Η ΤΙΜΗ ΣΕ ΔΟΛΑΡΙΑ ΕΙΝΑΙ:',ΕΥΡΩ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_11
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: ΔΡΧ,ΔΟΛ,ΙΣΟΤ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΣΕ ΕΥΡΩ ΚΑΙ ΤΗΝ ΙΣΟΤΙΜΙΑ'
ΔΙΑΒΑΣΕ ΕΥΡΩ,ΙΣΟΤ
ΔΟΛ<--ΕΥΡΩ*ΙΣΟΤ
ΓΡΑΨΕ 'Η ΤΙΜΗ ΣΕ ΔΟΛΑΡΙΑ ΕΙΝΑΙ:',ΕΥΡΩ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 12
Να γραφεί πρόγραμμα το οποίο θα δέχεται μια θερμοκρασία σε βαθμούς Κελσίου και θα υπολογίζει και θα εμφανίζει την αντίστοιχη σε βαθμούς Φαρενάιτ . (Δίνεται: °C ×9/5 + 32 = °F ). Πως θα έπρεπε να μετατρέψουμε το πρόγραμμα ώστε να δέχεται μια θερμοκρασία σε βαθμούς Φαρενάιτ και να την μετατρέπει σε βαθμούς κελσίου;
Να γραφεί πρόγραμμα το οποίο θα δέχεται μια θερμοκρασία σε βαθμούς Κελσίου και θα υπολογίζει και θα εμφανίζει την αντίστοιχη σε βαθμούς Φαρενάιτ . (Δίνεται: °C ×9/5 + 32 = °F ). Πως θα έπρεπε να μετατρέψουμε το πρόγραμμα ώστε να δέχεται μια θερμοκρασία σε βαθμούς Φαρενάιτ και να την μετατρέπει σε βαθμούς κελσίου;
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_12
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:C,F
ΑΡΧΗ
ΓΡΑΨΕ' ΔΩΣΕ ΤΗ ΘΕΡΜΟΚΡΑΣΙΑ ΣΕ ΒΑΘΜΟΥΣ ΚΕΛΣΊΟΥ'
ΔΙΑΒΑΣΕ C
F<--C*9/5+32
ΓΡΑΨΕ 'Η ΘΕΡΜΟΚΡΑΣΙΑ ΣΕ ΒΑΘΜΟΥΣ F ΕΙΝΑΙ:',F
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_12
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:C,F
ΑΡΧΗ
ΓΡΑΨΕ' ΔΩΣΕ ΤΗ ΘΕΡΜΟΚΡΑΣΙΑ ΣΕ ΒΑΘΜΟΥΣ ΚΕΛΣΊΟΥ'
ΔΙΑΒΑΣΕ C
F<--C*9/5+32
ΓΡΑΨΕ 'Η ΘΕΡΜΟΚΡΑΣΙΑ ΣΕ ΒΑΘΜΟΥΣ F ΕΙΝΑΙ:',F
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 13
Να πραγματοποιήσετε πρόγραμμα το οποίο θα δέχεται ένα ακέραιο αριθμό και εμφανίζει τον προηγούμενό του και τον επόμενό του.
Να πραγματοποιήσετε πρόγραμμα το οποίο θα δέχεται ένα ακέραιο αριθμό και εμφανίζει τον προηγούμενό του και τον επόμενό του.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_13
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
ΓΡΑΨΕ ' Ο ΠΡΟΗΓΟΥΜΕΝΟΣ ΕΙΝΑΙ Ο:',Χ-1
ΓΡΑΨΕ ' Ο ΕΠΟΜΕΝΟΣ ΕΙΝΑΙ Ο:',Χ+1
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_13
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
ΓΡΑΨΕ ' Ο ΠΡΟΗΓΟΥΜΕΝΟΣ ΕΙΝΑΙ Ο:',Χ-1
ΓΡΑΨΕ ' Ο ΕΠΟΜΕΝΟΣ ΕΙΝΑΙ Ο:',Χ+1
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 14
Διαβάζεται ένας πραγματικός αριθμός y καθώς και η θέση του σε μια κατάσταση (η οποία εκφράζεται με έναν θετικό ακέραιο αριθμό). Να εκτυπωθεί επακριβώς η παρακάτω φράση: «Για την μεταβλητή (η θέση του): y = (η τιμή του)»
Διαβάζεται ένας πραγματικός αριθμός y καθώς και η θέση του σε μια κατάσταση (η οποία εκφράζεται με έναν θετικό ακέραιο αριθμό). Να εκτυπωθεί επακριβώς η παρακάτω φράση: «Για την μεταβλητή (η θέση του): y = (η τιμή του)»
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_14
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ
ΠΡΑΓΜΑΤΙΚΕΣ:Υ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΤΟΥ ΑΡΙΘΜΟΥ ΚΑΙ ΤΗ ΘΕΣΗ ΤΟΥ'
ΔΙΑΒΑΣΕ Υ,Χ
ΓΡΑΨΕ ' Για την μεταβλητή:',Χ,'y = ',Υ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_14
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ
ΠΡΑΓΜΑΤΙΚΕΣ:Υ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΤΙΜΗ ΤΟΥ ΑΡΙΘΜΟΥ ΚΑΙ ΤΗ ΘΕΣΗ ΤΟΥ'
ΔΙΑΒΑΣΕ Υ,Χ
ΓΡΑΨΕ ' Για την μεταβλητή:',Χ,'y = ',Υ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 15
Να αναπτύξετε πρόγραμμα το οποίο θα δέχεται το μήκος της ακτίνας (R) ενός κύκλου και θα υπολογίζει το μήκος της περιμέτρου του (L=2πR) και το εμβαδό του (EMB = πR^2).
Να αναπτύξετε πρόγραμμα το οποίο θα δέχεται το μήκος της ακτίνας (R) ενός κύκλου και θα υπολογίζει το μήκος της περιμέτρου του (L=2πR) και το εμβαδό του (EMB = πR^2).
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_15
ΣΤΑΘΕΡΕΣ:
Π=3.14
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: R,EMB,L
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΜΗΚΟΣ ΤΗΣ ΑΚΤΙΝΑΣ'
ΔΙΑΒΑΣΕ R
L<--2*Π*R
ΓΡΑΨΕ ' Η ΠΕΡΙΜΕΤΡΟΣ ΤΟΥ ΚΥΚΛΟΥ ΕΙΝΑΙ:',L
EMB<--Π*R^2
ΓΡΑΨΕ 'ΤΟ ΕΜΒΑΔΟ ΤΟΥ ΚΥΚΛΟΥ ΕΙΝΑΙ:',ΕΜΒ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_15
ΣΤΑΘΕΡΕΣ:
Π=3.14
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: R,EMB,L
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΜΗΚΟΣ ΤΗΣ ΑΚΤΙΝΑΣ'
ΔΙΑΒΑΣΕ R
L<--2*Π*R
ΓΡΑΨΕ ' Η ΠΕΡΙΜΕΤΡΟΣ ΤΟΥ ΚΥΚΛΟΥ ΕΙΝΑΙ:',L
EMB<--Π*R^2
ΓΡΑΨΕ 'ΤΟ ΕΜΒΑΔΟ ΤΟΥ ΚΥΚΛΟΥ ΕΙΝΑΙ:',ΕΜΒ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 16
Μια οικογένεια κατανάλωσε Χ Κwh (κιλοβατώρες) ημερήσιου ρεύματος και Υ Kwh νυχτερινού ρεύματος. Το κόστος ημερήσιου ρεύματος είναι 0.30 € . ανά Kwh και του νυχτερινού 0.15 €. ανά Kwh. Να αναπτύξετε πρόγραμμα το οποίο:
α. να διαβάζει τα Χ, Υ
β. να υπολογίζει και να εμφανίζει το συνολικό κόστος της κατανάλωσης ρεύματος της οικογένειας .
Μια οικογένεια κατανάλωσε Χ Κwh (κιλοβατώρες) ημερήσιου ρεύματος και Υ Kwh νυχτερινού ρεύματος. Το κόστος ημερήσιου ρεύματος είναι 0.30 € . ανά Kwh και του νυχτερινού 0.15 €. ανά Kwh. Να αναπτύξετε πρόγραμμα το οποίο:
α. να διαβάζει τα Χ, Υ
β. να υπολογίζει και να εμφανίζει το συνολικό κόστος της κατανάλωσης ρεύματος της οικογένειας .
Λύση
ΠΡΟΓΡΑΜΜΑΤΟΣ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ,Υ
ΠΡΑΓΜΑΤΙΚΕΣ:Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΛΗΘΟΣ ΤΩΝ ΗΜΕΡΗΣΙΩΝ ΚΑΙ ΝΥΧΤΕΡΙΝΩΝ ΚΙΛΟΒΑΤΩΡΩΝ'
ΔΙΑΒΑΣΕ Χ,Υ
Κ<--Χ*Ο.30+Υ*Ο.15
ΓΡΑΨΕ ' ΤΟ ΣΥΝΟΛΙΚΟ ΚΟΣΤΟΣ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑΤΟΣ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: Χ,Υ
ΠΡΑΓΜΑΤΙΚΕΣ:Κ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΠΛΗΘΟΣ ΤΩΝ ΗΜΕΡΗΣΙΩΝ ΚΑΙ ΝΥΧΤΕΡΙΝΩΝ ΚΙΛΟΒΑΤΩΡΩΝ'
ΔΙΑΒΑΣΕ Χ,Υ
Κ<--Χ*Ο.30+Υ*Ο.15
ΓΡΑΨΕ ' ΤΟ ΣΥΝΟΛΙΚΟ ΚΟΣΤΟΣ ΕΙΝΑΙ:',Κ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 17
Υπολογισμός κόστους βενζίνης . Να αναπτύξετε πρόγραμμα το οποίο θα δέχεται ως είσοδο: το κόστος της βενζίνης
(€/lt) , την κατανάλωση του αυτοκινήτου (lt/km) και την απόσταση που πρόκειται να διανυθεί (km) και θα εμφανίζει το
κόστος της βενζίνης για την κάλυψη της συγκεκριμένης διαδρομής.
Υπολογισμός κόστους βενζίνης . Να αναπτύξετε πρόγραμμα το οποίο θα δέχεται ως είσοδο: το κόστος της βενζίνης
(€/lt) , την κατανάλωση του αυτοκινήτου (lt/km) και την απόσταση που πρόκειται να διανυθεί (km) και θα εμφανίζει το
κόστος της βενζίνης για την κάλυψη της συγκεκριμένης διαδρομής.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_17
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Κ,ΚΑΤ,ΑΠ,ΠΟΣΟ,ΛΙΤΡΑ
ΑΡΧΗ
ΓΡΑΨΕ ' ΔΩΣΕ ΤΟ ΚΟΣΤΟΣ ΤΟΥ ΚΑΥΣΙΜΟΥ ΑΝΑ ΛΙΤΡΟ'
ΔΙΑΒΑΣΕ Κ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΚΑΤΑΝΑΛΩΣΗ ΤΟΥ ΑΥΤΟΚΙΝΗΤΟΥ ΣΤΑ 100 ΚΜ'
ΔΙΑΒΑΣΕ ΚΑΤ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΑΠΟΣΤΑΣΗ'
ΔΙΑΒΑΣΕ ΑΠ
ΛΙΤΡΑ<--ΚΑΤ*ΑΠ/100
ΠΟΣΟ<--ΛΙΤΡΑ*Κ
ΓΡΑΨΕ 'ΤΟ ΚΟΣΤΟΣ ΤΟΥ ΚΑΥΣΙΜΟΥ ΘΑ ΕΙΝΑΙ:',ΠΟΣΟ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_17
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ: Κ,ΚΑΤ,ΑΠ,ΠΟΣΟ,ΛΙΤΡΑ
ΑΡΧΗ
ΓΡΑΨΕ ' ΔΩΣΕ ΤΟ ΚΟΣΤΟΣ ΤΟΥ ΚΑΥΣΙΜΟΥ ΑΝΑ ΛΙΤΡΟ'
ΔΙΑΒΑΣΕ Κ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΚΑΤΑΝΑΛΩΣΗ ΤΟΥ ΑΥΤΟΚΙΝΗΤΟΥ ΣΤΑ 100 ΚΜ'
ΔΙΑΒΑΣΕ ΚΑΤ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΗΝ ΑΠΟΣΤΑΣΗ'
ΔΙΑΒΑΣΕ ΑΠ
ΛΙΤΡΑ<--ΚΑΤ*ΑΠ/100
ΠΟΣΟ<--ΛΙΤΡΑ*Κ
ΓΡΑΨΕ 'ΤΟ ΚΟΣΤΟΣ ΤΟΥ ΚΑΥΣΙΜΟΥ ΘΑ ΕΙΝΑΙ:',ΠΟΣΟ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 18
Να πραγματοποιηθεί πρόγραμμα το οποίο θα δέχεται έναν αριθμό και θα υπολογίζει το υπόλοιπο της ακέραιας διαίρεσής
του με το δυο.
Να πραγματοποιηθεί πρόγραμμα το οποίο θα δέχεται έναν αριθμό και θα υπολογίζει το υπόλοιπο της ακέραιας διαίρεσής
του με το δυο.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_18
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ,Υ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Υ<-- X MOD 2
ΓΡΑΨΕ 'ΤΟ ΥΠΟΛΟΙΠΟ ΤΗΣ ΑΚΕΡΑΙΑΣ ΔΙΑΙΡΕΣΗΣ ΤΟΥ ΜΕ ΤΟ 2 ΕΙΝΑΙ:',Υ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_18
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Χ,Υ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΚΕΡΑΙΟ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Υ<-- X MOD 2
ΓΡΑΨΕ 'ΤΟ ΥΠΟΛΟΙΠΟ ΤΗΣ ΑΚΕΡΑΙΑΣ ΔΙΑΙΡΕΣΗΣ ΤΟΥ ΜΕ ΤΟ 2 ΕΙΝΑΙ:',Υ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 19
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται έναν πραγματικό αριθμό και θα υπολογίζει το ακέραιο μέρος του.
Να δημιουργηθεί πρόγραμμα το οποίο θα δέχεται έναν πραγματικό αριθμό και θα υπολογίζει το ακέραιο μέρος του.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_19
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Α
ΠΡΑΓΜΑΤΙΚΕΣ :Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Α<-- Α_Μ(Χ)
ΓΡΑΨΕ 'ΤΟ ΑΚΕΡΑΙΟ ΜΕΡΟΣ ΤΟΥ ',Χ,' ΕΙΝΑΙ ΤΟ :',Α
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_19
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ:Α
ΠΡΑΓΜΑΤΙΚΕΣ :Χ
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΕΝΑΝ ΑΡΙΘΜΟ'
ΔΙΑΒΑΣΕ Χ
Α<-- Α_Μ(Χ)
ΓΡΑΨΕ 'ΤΟ ΑΚΕΡΑΙΟ ΜΕΡΟΣ ΤΟΥ ',Χ,' ΕΙΝΑΙ ΤΟ :',Α
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 20
Να γίνει πρόγραμμα το οποίο θα δέχεται ως είσοδο δυο πραγματικούς αριθμούς από το πληκτρολόγιο και στη συνέχεια
θα πραγματοποιεί αντιμετάθεση των περιεχομένων τους.
Να γίνει πρόγραμμα το οποίο θα δέχεται ως είσοδο δυο πραγματικούς αριθμούς από το πληκτρολόγιο και στη συνέχεια
θα πραγματοποιεί αντιμετάθεση των περιεχομένων τους.
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_20
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Α,Β,ΤΕMP
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΔΥΟ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β
TEMP<--A
A<--B
B<-- TEMP
ΓΡΑΨΕ Α,Β
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_20
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Α,Β,ΤΕMP
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΔΥΟ ΑΡΙΘΜΟΥΣ'
ΔΙΑΒΑΣΕ Α,Β
TEMP<--A
A<--B
B<-- TEMP
ΓΡΑΨΕ Α,Β
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
Άσκηση 21
Μια εταιρία αποφάσισε να πραγματοποιήσει αύξηση 12% στους μισθούς των υπαλλήλων της . Να δημιουργήσετε
πρόγραμμα το οποίο :
Μια εταιρία αποφάσισε να πραγματοποιήσει αύξηση 12% στους μισθούς των υπαλλήλων της . Να δημιουργήσετε
πρόγραμμα το οποίο :
- Θα δέχεται τον μισθό ενός υπαλλήλου.
- Θα υπολογίζει και θα εμφανίζει το ποσό της αύξησης που θα λάβει ο υπάλληλος.
- Θα εμφανίζει το νέο μισθό του υπαλλήλου
Λύση
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_21
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,ΑΥΞ,Ν
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΜΙΣΘΟ ΤΟΥ ΥΠΑΛΛΗΛΟΥ'
ΔΙΑΒΑΣΕ Χ
ΑΥΞ<--Χ*12/100
ΓΡΑΨΕ ' Η ΑΥΞΗΣΗ ΘΑ ΕΙΝΑΙ:',ΑΥΞ
Ν<--Χ+ΑΥΞ
ΓΡΑΨΕ 'Ο ΝΕΟΣ ΜΙΣΘΟΣ ΘΑ ΕΙΝΑΙ:',Ν
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
ΠΡΟΓΡΑΜΜΑ ΑΣΚ_21
ΜΕΤΑΒΛΗΤΕΣ
ΠΡΑΓΜΑΤΙΚΕΣ:Χ,ΑΥΞ,Ν
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΕ ΤΟ ΜΙΣΘΟ ΤΟΥ ΥΠΑΛΛΗΛΟΥ'
ΔΙΑΒΑΣΕ Χ
ΑΥΞ<--Χ*12/100
ΓΡΑΨΕ ' Η ΑΥΞΗΣΗ ΘΑ ΕΙΝΑΙ:',ΑΥΞ
Ν<--Χ+ΑΥΞ
ΓΡΑΨΕ 'Ο ΝΕΟΣ ΜΙΣΘΟΣ ΘΑ ΕΙΝΑΙ:',Ν
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ