e-ΜΑΘΗΜΑΤΑ |
Λύσεις ασκήσεων Τράπεζας Θεμάτων |
ΠΡΟΓΡΑΜΜΑ ΦΟΡΤΗΓΑ_ΤΘ_30793
!ΘΕΜΑ 4
!Ορισμένες κατηγορίες φορτηγών αυτοκινήτων προκειμένου να φορτωθούν
!σε ορισμένα μεταφορικά μέσα (πχ. πλοία, τρένα) πρέπει να ζυγιστούν.
!Να γραφεί πρόγραμμα σε ΓΛΩΣΣΑ το οποίο:
!4.1
!Να περιέχει κατάλληλο τμήμα δηλώσεων.
!Μονάδες 4
!4.2
!Να διαβάζει το βάρος των φορτηγών που ζυγίζονται σε κιλά (Kgr) και τους άξονες
!που διαθέτει με έλεγχο ορθότητας δεδομένων (βάρος >= 0, 2 <= άξονες <= 4).
!Η εισαγωγή να τερματίζεται όταν δοθεί βάρος 0 ή το συνολικό βάρος των φορτηγών
!που ζυγίστηκαν είναι μεγαλύτερο των 100.000.000 Kgr (Να υποθέσετε ότι ζυγίζεται
! τουλάχιστον ένα φορτηγό)
!Μονάδες 13
!4.3
!Να υπολογίζει και θα εμφανίζει το βάρος ανά άξονα για κάθε φορτηγό και
!το μέσο βάρος όλων των φορτηγών που ζυγίστηκαν.
!Μονάδες 8
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: άξονες, πλήθος
ΠΡΑΓΜΑΤΙΚΕΣ: βάρος, βάρος_Ανά_Aξονα, άθροισμα_Βαρών, συνολικό_Βάρος, μέσο_Βάρος
ΑΡΧΗ
πλήθος <- 0
άθροισμα_Βαρών <- 0
συνολικό_Βάρος <- 0
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
! Ανάγνωση βάρους με έλεγχο ορθότητας (>=0)
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βάρος φορτηγού σε Kgr (>=0): '
ΔΙΑΒΑΣΕ βάρος
ΜΕΧΡΙΣ_ΟΤΟΥ βάρος >= 0
ΑΝ βάρος <> 0 ΤΟΤΕ
! Ανάγνωση αριθμού αξόνων με έλεγχο (2..4)
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε αριθμό αξόνων (2-4): '
ΔΙΑΒΑΣΕ άξονες
ΜΕΧΡΙΣ_ΟΤΟΥ άξονες >= 2 ΚΑΙ άξονες <= 4
βάρος_Ανά_Aξονα <- βάρος/ άξονες
ΓΡΑΨΕ 'Βάρος ανά άξονα: ', βάρος_Ανά_Aξονα
πλήθος <- πλήθος + 1
άθροισμα_Βαρών <- άθροισμα_Βαρών + βάρος
συνολικό_Βάρος <- συνολικό_Βάρος + βάρος
ΤΕΛΟΣ_ΑΝ
ΜΕΧΡΙΣ_ΟΤΟΥ βάρος = 0 Η συνολικό_Βάρος > 100000000
ΑΝ πλήθος > 0 ΤΟΤΕ
μέσο_Βάρος <- άθροισμα_Βαρών/ πλήθος
ΓΡΑΨΕ 'Μέσο βάρος όλων των φορτηγών: ', μέσο_Βάρος
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Δεν ζυγίστηκε κανένα φορτηγό.'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ