!Ένα οχηματαγωγό πλοίο, χωρητικότητας 250 αυτοκινήτων, εκτελεί το δρομολόγιο ΠΕΙΡΑΙΑΣ – !ΑΙΓΙΝΑ. Τα οχήματα που επιβιβάζονται πρώτα είναι αυτά που θα αποβιβαστούν τελευταία.!! Στο λιμάνι του Πειραιά προσέρχονται τα αυτοκίνητα για αναχώρηση. Να γίνει πρόγραμμα !το οποίο:
!1.	Να υπάρχει μενού επιλογής:
!		1. Επιβίβαση 	2. Αποβίβαση 	3. Έξοδος
!2.	 Στη περίπτωση που επιλεχθεί η Επιβίβαση θα διαβάζει τον αριθμό κυκλοφορίας καθενός !από τα αυτοκίνητα που προσέρχονται και ο αριθμός κυκλοφορίας του να καταχωρείται στη !στοίβα ΟΧΗΜΑΤΑ. Κάθε φορά που επιβιβάζεται ένα αυτοκίνητο να τυπώνεται το ερώτημα !"Υπάρχει άλλο αυτοκίνητο (Ν/Ο); ". Αν ο χρήστης απαντήσει Ν (=ΝΑΙ), επαναλαμβάνεται η διαδικασία επιβίβασης, ενώ αν απαντήσει Ο (=ΟΧΙ), σταματά η διαδικασία επιβίβασης και επιστρέφει το πρόγραμμα στο μενού Επιλογής.
!3.	Αν το πλοίο γεμίσει η επιβίβαση σταματά εμφανίζεται κατάλληλο μήνυμα και επιστρέφει το πρόγραμμα στο μενού επιλογής.
!4.	Στη περίπτωση που επιλεχθεί η Αποβίβαση, εξάγει και εμφανίζει από την στοίβα ΟΧΗΜΑΤΑ όλους τους αριθμούς αυτοκινήτων που είχαν επιβιβαστεί στον ΠΕΙΡΑΙΑ, με τη σειρά που αποβιβάζονται. Στο τέλος να τυπώνεται το πλήθος των αυτοκινήτων που αποβιβάστηκαν στο λιμάνι της ΑΙΓΙΝΑΣ
! Η ΛΥΣΗ ΣΤΗ ΓΛΩΣΣΑ ΕΙΝΑΙ ΓΙΑ 5 ΑΥΤΟΚΙΝΗΤΑ
ΠΡΟΓΡΑΜΜΑ Λιμάνι
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: τοπ, επ1, πλ
  ΧΑΡΑΚΤΗΡΕΣ: επ2, αρ, π[5] 
ΑΡΧΗ
  τοπ <- 0
  ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
    ΓΡΑΨΕ '             Μενού Επιλογών'
    ΓΡΑΨΕ '              1. Επιβίβαση'
    ΓΡΑΨΕ '              2. Αποβίβαση'
    ΓΡΑΨΕ '              3. Έξοδος'
    ΓΡΑΨΕ '        Δώσε επιλογή:'
    ΔΙΑΒΑΣΕ επ1
    ΑΝ επ1 = 1 ΤΟΤΕ
      ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
        ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
          ΓΡΑΨΕ '                  Υπάρχει αυτοκίνητο για επιβίβαση (Ν/Ο);'
          ΔΙΑΒΑΣΕ επ2
          ΑΝ επ2 <> 'Ν' ΚΑΙ επ2 <> 'ν' ΚΑΙ επ2 <> 'Ο' ΚΑΙ επ2 <> 'ο' ΤΟΤΕ
            ΓΡΑΨΕ 'Λάθος επιλογή. Ξαναπροσπάθησε!!!'
          ΤΕΛΟΣ_ΑΝ
        ΜΕΧΡΙΣ_ΟΤΟΥ επ2 = 'Ο' Η επ2 = 'ο' Η επ2 = 'Ν' Η επ2 = 'ν'
        ΑΝ επ2 = 'Ν' Η επ2 = 'ν' ΤΟΤΕ
          ΑΝ τοπ < 5 ΤΟΤΕ
            ΓΡΑΨΕ 'Δώσε αριθμό κυκλοφορίας του αυτοκινήτου:'
            ΔΙΑΒΑΣΕ αρ
            τοπ <- τοπ + 1
            π[τοπ] <- αρ
            ΑΝ τοπ = 5 ΤΟΤΕ
              ΓΡΑΨΕ 'Το πλοίο γέμισε και δεν χωρά άλλα αμάξια'
            ΤΕΛΟΣ_ΑΝ
          ΑΛΛΙΩΣ
            ΓΡΑΨΕ 'Το πλοίο είναι γεμάτο'
          ΤΕΛΟΣ_ΑΝ
        ΤΕΛΟΣ_ΑΝ
      ΜΕΧΡΙΣ_ΟΤΟΥ τοπ = 5 Η επ2 = 'Ο' Η επ2 = 'ο'
    ΑΛΛΙΩΣ_ΑΝ επ1 = 2 ΤΟΤΕ
      πλ <- 0
      ΟΣΟ τοπ >= 1 ΕΠΑΝΑΛΑΒΕ
        ΓΡΑΨΕ 'Αποβιβάζεται το αυτοκίνητο με αριθμό κυκλοφορίας:', π[τοπ] 
        π[τοπ] <- ' '
        τοπ <- τοπ - 1
        πλ <- πλ + 1
      ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
      ΓΡΑΨΕ 'Πλήθος οχημάτων που αποβιβάστηκαν στο λιμάνι της ΑΙΓΙΝΑΣ:', πλ
    ΤΕΛΟΣ_ΑΝ
  ΜΕΧΡΙΣ_ΟΤΟΥ επ1 = 3
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Λιμάνι