!Πρόγραμμα Σύγρισης Μισθών
!2ο Επαναληπτικό Διαγώνισμα
!Θέμα 3οΒ
!Δυο παντρεμένοι ξεχωριστά αξιωματικοί του στρατού προσπαθούσαν να συγκρίνουν τις αποδοχές που έχει έκαστος από το στρατό. Εκτός από τον μηνιαίο βασικό μισθό έχουν και τα εξής επιδόματα: 20€ για κάθε παιδί, 35€ επίδομα συζύγου. Οι κρατήσεις (φορολογία) στις οποίες υπόκεινται ο μηνιαίος μισθός είναι 20%, ενώ για ασφάλιση υπάρχει κράτηση 11%. Τον συγκεκριμένο μήνα, λόγω εξαιρετικής εργασίας ο διοικητής αποφάσισε να διπλασιάσει το καθαρό εισόδημα του πρώτου. Να αναπτύξετε ένα πρόγραμμα που θα διαβάζει τον βασικό μηνιαίο μισθό τον αριθμό των παιδιών κάθε αξιωματικού και θα υπολογίζει και θα εμφανίζει για τον συγκεκριμένο μήνα:
!(α) το μεικτό εισόδημα του κάθε αξιωματικού
!(β) το σύνολο των κρατήσεων στις οποίες υπόκεινται κάθε αξιωματικός
!(γ) τις καθαρές αποδοχές κάθε αξιωματικού το συγκεκριμένο μήνα
ΠΡΟΓΡΑΜΜΑ Θέμα3ο_Α
ΣΤΑΘΕΡΕΣ
Schildren = 20
Stax = 20
Shealth = 11
Stax_sum = Stax + Shealth
Smarriage = 35
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: children1, children2
ΠΡΑΓΜΑΤΙΚΕΣ: money1, money2, income1, income2, tax1, tax2, wallet1, wallet2
ΑΡΧΗ
ΓΡΑΨΕ 'Καλώς όρισες στο πρόγραμμα Σύγκρισης Μισθών'
ΓΡΑΨΕ 'Μισθός 1ου στρατιωτικού'
ΔΙΑΒΑΣΕ money1
ΓΡΑΨΕ 'Αριθμός παιδιών'
ΔΙΑΒΑΣΕ children1
ΓΡΑΨΕ 'Μισθός 2ου στρατιωτικού'
ΔΙΑΒΑΣΕ money2
ΓΡΑΨΕ 'Αριθμός παιδιών'
ΔΙΑΒΑΣΕ children2
income1 <-- money1 + children1*Schildren + Smarriage
income2 <-- money2 + children2*Schildren + Smarriage
tax1 <-- Stax_sum/100*income1
tax2 <-- Stax_sum/100*income2
wallet1 <-- (income1 - tax1)*2
wallet2 <-- income2 - tax2
ΓΡΑΨΕ '----------------------'
ΓΡΑΨΕ '1ος Στρατιωτικός'
ΓΡΑΨΕ 'Μεικτό εισόδημα ', income1, '€ , ', 'Κρατήσεις ', tax1, '€ , ', 'Καθαρά Έσοδα ', wallet1, '€'
ΓΡΑΨΕ '----------------------'
ΓΡΑΨΕ '2ος Στρατιωτικός'
ΓΡΑΨΕ 'Μεικτό εισόδημα ', income2, '€ , ', 'Κρατήσεις ', tax2, '€ , ', 'Καθαρά Έσοδα ', wallet2, '€'
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ