2ο ΓΕΛ Γέρακα - ΑΣΚΗΣΕΙΣ ΑΕΠΠ

e-ΜΑΘΗΜΑΤΑ
Ανάπτυξη Εφαρμογών σε Προγραμματιστικό περιβάλλον
Λύσεις ασκήσεων από θέματα Πανελλαδικών εξετάσεων

ΠΡΟΓΡΑΜΜΑ HARD_DISK_AEPP

!ΘΕΜΑ Γ

!Ένας μαθητής αγόρασε έναν εξωτερικό δίσκο χωρητικότητας 1000 GB,

!προκειμένου να αποθηκεύσει σε αυτόν ψηφιακά αρχεία.

!Να γραφεί πρόγραμμα σε ΓΛΩΣΣΑ, το οποίο:

!Γ1. α. Να περιλαμβάνει κατάλληλο τμήμα δηλώσεων.  (μονάδες 2)

!β. Για κάθε ψηφιακό αρχείο που θέλει να αποθηκεύσει ο μαθητής στον

!εξωτερικό δίσκο, να διαβάζει το όνομά του και το μέγεθός του (σε

!GB) και να ελέγχει, αν επαρκεί η διαθέσιμη χωρητικότητα του

!εξωτερικού δίσκου. Εφόσον επαρκεί, να εμφανίζει το μήνυμα

!«Επιτρεπτή αποθήκευση» και να υπολογίζει τη νέα διαθέσιμη

!χωρητικότητα του εξωτερικού δίσκου. Να τερματίζει τον έλεγχο της

!αποθήκευσης ψηφιακών αρχείων στον εξωτερικό δίσκο, όταν το

!μέγεθος του αρχείου που θέλει να αποθηκεύσει ο μαθητής είναι

!μεγαλύτερο από τη διαθέσιμη χωρητικότητα του εξωτερικού δίσκου.  (μονάδες 6)

!Μονάδες 8

!Γ2. Να υπολογίζει και να εμφανίζει το ποσοστό του αριθμού των αρχείων

!που αποθηκεύτηκαν και έχουν μέγεθος μεγαλύτερο των 10 GB.     Μονάδες 4

!Γ3. Να βρίσκει και να εμφανίζει τα ονόματα των δύο μικρότερων σε μέγεθος

!αρχείων που αποθηκεύτηκαν στον εξωτερικό δίσκο.         !Μονάδες 8

!Να θεωρήσετε ότι:

!α) θα αποθηκευτούν τουλάχιστον δύο αρχεία στον εξωτερικό δίσκο,

!β) τα μεγέθη όλων των αρχείων που αποθηκεύονται, είναι διαφορετικά

!μεταξύ τους.



ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: χωρητικότητα, μέγεθος, πλήθος, πλήθος10, min1, min2

  ΧΑΡΑΚΤΗΡΕΣ: όνομα, min1_ονομα, min2_ονομα



ΑΡΧΗ

  χωρητικότητα <- 1000

  πλήθος <- 0

  πλήθος10 <- 0

  min1 <- 1001

  min2 <- 1001

  min1_ονομα <- ''

  min2_ονομα <- ''



  ΓΡΑΨΕ 'Δώστε όνομα, μέγεθος'

  ΔΙΑΒΑΣΕ όνομα, μέγεθος

  ΟΣΟ μέγεθος <= χωρητικότητα ΕΠΑΝΑΛΑΒΕ

    ΓΡΑΨΕ 'Επιτρεπτή αποθήκευση'

    χωρητικότητα <- χωρητικότητα - μέγεθος



    πλήθος <- πλήθος + 1



    ΑΝ μέγεθος > 10 ΤΟΤΕ

      πλήθος10 <- πλήθος10 + 1

    ΤΕΛΟΣ_ΑΝ



    ΑΝ μέγεθος < min1 ΤΟΤΕ

      min2 <- min1

      min2_ονομα <- min1_ονομα

      min1 <- μέγεθος

      min1_ονομα <- όνομα

    ΑΛΛΙΩΣ_ΑΝ μέγεθος < min2 ΤΟΤΕ

      min2 <- μέγεθος

      min2_ονομα <- όνομα

    ΤΕΛΟΣ_ΑΝ



    ΓΡΑΨΕ 'Δώστε όνομα, μέγεθος'

    ΔΙΑΒΑΣΕ όνομα, μέγεθος

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ



  ΑΝ πλήθος <> 0 ΤΟΤΕ

    ΓΡΑΨΕ "Ποσοστό αρχείων > 10 GB ", πλήθος10/ πλήθος* 100, "%"

  ΤΕΛΟΣ_ΑΝ



  ΓΡΑΨΕ min1_ονομα

  ΓΡΑΨΕ min2_ονομα



ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ