|
e-ΜΑΘΗΜΑΤΑ |
|
Λύσεις ασκήσεων από τον Οδηγό Μελέτης Μαθητών |
ΠΡΟΓΡΑΜΜΑ Τμήμα_Προσωπικού_Επιχείρησης
! ΑΕΠΠ - Οδηγός Μελέτης Μαθητή
! Μη λυμένες ασκήσεις 4.10.2
!
! Να γραφεί πρόγραμμα σε "ΓΛΩΣΣΑ", το οποίο να διαβάζει για τους 176 υπαλλήλους
! μιας επιχείρησης τα ονόματα, το έτος πρόσληψης, τα έτη προϋπηρεσίας σε άλλες
! επιχειρήσεις και να αποθηκεύονται στους πίνακες ΟΝΟΜΑΤΑ, ΕΤΟΣ_ΠΡΟΣΛΗΨΗΣ και
! ΕΤΗ_ΥΠΗΡΕΣΙΑΣ αντίστοιχα. Στη συνέχεια να:
! 1) Εμφανίζει τα ονόματα των υπαλλήλων που θα συνταξιοδοτηθούν την επόμενη
! πενταετία καθώς και το πλήθος τους.
! Σύνταξη δίνεται στα 40 έτη συνολικής υπηρεσίας και άνω.
! 2) Δημιουργηθεί πίνακας με το όνομα ΝΕΟΙ_ΕΡΓΑΖΟΜΕΝΟΙ, με τα ονόματα των
! εργαζομένων που έχουν συνολικά έτη υπηρεσίας (μαζί και η προϋπηρεσία τους)
! λιγότερα από 5 και στη συνέχεια να τα εμφανίζει.
ΣΤΑΘΕΡΕΣ
! Ν = 176
Ν = 3
φέτος = 2017
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΕΤΟΣ_ΠΡΟΣΛΗΨΗΣ[Ν], ΕΤΗ_ΥΠΗΡΕΣΙΑΣ[Ν], i, πλήθος, new
ΧΑΡΑΚΤΗΡΕΣ: ΟΝΟΜΑΤΑ[Ν], ΝΕΟΙ_ΕΡΓΑΖΟΜΕΝΟΙ[Ν]
ΑΡΧΗ
! Διάβασμα τιμών
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
ΓΡΑΨΕ 'Δώστε ', i, 'o όνομα : '
ΔΙΑΒΑΣΕ ΟΝΟΜΑΤΑ[i]
ΓΡΑΨΕ 'Δώστε έτος πρόσληψης : '
ΔΙΑΒΑΣΕ ΕΤΟΣ_ΠΡΟΣΛΗΨΗΣ[i]
ΓΡΑΨΕ 'Δώστε έτη προϋπηρεσίας : '
ΔΙΑΒΑΣΕ ΕΤΗ_ΥΠΗΡΕΣΙΑΣ[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Ονόματα υπαλλήλων που θα συνταξιοδοτηθούν την επόμενη πενταετία:'
πλήθος <- 0
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
ΑΝ ( φέτος - ΕΤΟΣ_ΠΡΟΣΛΗΨΗΣ[i]) + ΕΤΗ_ΥΠΗΡΕΣΙΑΣ[i] + 5 >= 40 ΤΟΤΕ
ΓΡΑΨΕ ΟΝΟΜΑΤΑ[i]
πλήθος <- πλήθος + 1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Πλήθος : ', πλήθος
ΓΡΑΨΕ 'Αντιγραφή νέων σε πίνακα και εμφάνιση'
new <- 0
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
ΑΝ ( φέτος - ΕΤΟΣ_ΠΡΟΣΛΗΨΗΣ[i]) + ΕΤΗ_ΥΠΗΡΕΣΙΑΣ[i] < 5 ΤΟΤΕ
new <- new + 1
ΝΕΟΙ_ΕΡΓΑΖΟΜΕΝΟΙ[new] <- ΟΝΟΜΑΤΑ[i]
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ new
ΓΡΑΨΕ ΝΕΟΙ_ΕΡΓΑΖΟΜΕΝΟΙ[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
|
|
|
|
