e-ΜΑΘΗΜΑΤΑ |
Λύσεις ασκήσεων Τράπεζας Θεμάτων |
ΠΡΟΓΡΑΜΜΑ ΑΥΞΗΣΕΙΣ_ΤΘ_25674
!ΘΕΜΑ 4
!Μια κατασκευαστική εταιρεία απασχολεί 80 υπαλλήλους. Τα στοιχεία όλων
!των υπαλλήλων βρίσκονται καταχωρημένα στον κεντρικό η/υ της εταιρείας.
!Να γραφεί πρόγραμμα στη γλώσσα προγραμματισμού «ΓΛΩΣΣΑ» το οποίο:
!
!4.1 Να διαβάζει από το πληκτρολόγιο τα ονοματεπώνυμα και τους μηνιαίους
!μισθούς των υπαλλήλων της εταιρείας και τα καταχωρεί αντίστοιχα στους πίνακες
!ΥΠΑΛΛΗΛΟΙ[80] και ΜΙΣΘΟΣ[80].
!Μονάδες 6
!4.2 Να δίνει αύξηση 10% σε όλους τους υπαλλήλους της εταιρείας
!Μονάδες 4
!4.3 Να τυπώνει μια λίστα με τα ονοματεπώνυμα των υπαλλήλων κατά φθίνουσα σειρά μισθού
!Μονάδες 15
ΣΤΑΘΕΡΕΣ
Ν = 80
ΜΕΤΑΒΛΗΤΕΣ
ΧΑΡΑΚΤΗΡΕΣ: ΥΠΑΛΛΗΛΟΙ[Ν]
ΠΡΑΓΜΑΤΙΚΕΣ: ΜΙΣΘΟΣ[Ν]
ΑΚΕΡΑΙΕΣ: i, j
ΠΡΑΓΜΑΤΙΚΕΣ: temp_μισθός
ΧΑΡΑΚΤΗΡΕΣ: temp_υπάλληλος
ΑΡΧΗ
! 4.1 Ανάγνωση δεδομένων
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
ΓΡΑΨΕ 'Δώστε το ονοματεπώνυμο του υπαλλήλου ', i, ': '
ΔΙΑΒΑΣΕ ΥΠΑΛΛΗΛΟΙ[i]
ΓΡΑΨΕ 'Δώστε τον μηνιαίο μισθό του υπαλλήλου ', ΥΠΑΛΛΗΛΟΙ[i], ': '
ΔΙΑΒΑΣΕ ΜΙΣΘΟΣ[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! 4.2 Αύξηση μισθών κατά 10%
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
ΜΙΣΘΟΣ[i] <- ΜΙΣΘΟΣ[i]* 1.1
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! 4.3 Φθίνουσα ταξινόμηση κατά μισθό
ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ Ν
ΓΙΑ j ΑΠΟ Ν ΜΕΧΡΙ i ΜΕ_ΒΗΜΑ -1
ΑΝ ΜΙΣΘΟΣ[j - 1] < ΜΙΣΘΟΣ[j] ΤΟΤΕ
! Ανταλλαγή μισθών
temp_μισθός <- ΜΙΣΘΟΣ[j]
ΜΙΣΘΟΣ[j] <- ΜΙΣΘΟΣ[j - 1]
ΜΙΣΘΟΣ[j - 1] <- temp_μισθός
! Ανταλλαγή ονομάτων υπαλλήλων
temp_υπάλληλος <- ΥΠΑΛΛΗΛΟΙ[j]
ΥΠΑΛΛΗΛΟΙ[j] <- ΥΠΑΛΛΗΛΟΙ[j - 1]
ΥΠΑΛΛΗΛΟΙ[j - 1] <- temp_υπάλληλος
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! Εμφάνιση αποτελεσμάτων
ΓΡΑΨΕ 'Λίστα υπαλλήλων κατά φθίνουσα σειρά μισθού:'
ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
ΓΡΑΨΕ ΥΠΑΛΛΗΛΟΙ[i], ' - ', ΜΙΣΘΟΣ[i]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ