Monthly Archives: Φεβρουαρίου 2012

Το πρόβλημα των μονών και ζυγών αριθμών

Να κατασκευαστεί πρόγραμμα σε γλώσσα Pascal το οποίο:

  1. Να εμφανίζει τους ζυγούς αριθμούς από το 50 μέχρι το 100.
  2. Να εμφανίζει τους μονούς  αριθμούς στο διάστημα από το 0 μέχρι 100 κατά φθίνουσα σειρά.

Παρατήρηση: Για το καθένα από τα ζητούμενα να χρησιμοποιηθούν και τα τρία είδη εντολής επανάληψης που υποστηρίζει η γλώσσα Pascal.

Ψιτ! Δες και τα υπόλοιπα…

Advertisements

Το πρόβλημα της ομάδας μπάσκετ

Ένας αθλητικός συντάκτης θα γράψει άρθρο για την ομάδα μπάσκετ του Πανκουρελιακού για την αγωνιστική περίοδο 2008-2009. Τα στοιχεία που έχει στα χέρια του είναι το σύνολο των αγώνων που έδωσε η ομάδα εκείνη τη χρονιά, καθώς και το σύνολο των πόντων που σκόραρε και δέχθηκε σε κάθε έναν από τους αγώνες που έδωσε.

Το ζητούμενο για αυτόν είναι να υπολογίσει το σύνολο των πόντων που σκόραρε και δέχθηκε η ομάδα σε όλους τους αγώνες της περιόδου αυτής καθώς και τους πόντους που δέχθηκε, στον αγώνα που σκόραρε τους περισσότερους πόντους.

Να κατασκευαστεί πρόγραμμα σε γλώσσα Pascal το οποίο:

  1. Να διαβάζει τον αριθμό των αγώνων που έδωσε η ομάδα.
  2. Να διαβάζει τους πόντους που σκόραρε και δέχθηκε σε κάθε έναν από τους αγώνες.
  3. Να υπολογίζει τους συνολικούς πόντους που σκόραρε και δέχθηκε η ομάδα.
  4. Να υπολογίζει τους πόντους που δέχθηκε στον αγώνα που σκόραρε τους περισσότερους πόντους.
  5. Να εμφανίζει τα μηνύματα:
    Η ομάδα σκόραρε συνολικά .... πόντους.
    Η ομάδα δέχθηκε συνολικά .... πόντους.
    Οι πόντοι που δέχθηκε, στον αγώνα που πέτυχε τους περισσότερους πόντους, είναι ....

Ψιτ! Δες και τα υπόλοιπα…

Το πρόβλημα των επαναλήψεων της for

Αν στη μεταβλητή k έχει αποδοθεί η αρχική τιμή 10, να υπολογίσετε την τιμή της μεταβλητής μετά το τέλος της κάθε επανάληψης θεωρώντας ότι ξεκινά πάντα από την αρχική τιμή.

  1. for i := 1 to 0 do k := k + 1;
  2. for i := 1 to 1 do k := k + 1;
  3. for i := 1 to 10 do k := k + 1;
  4. for i := 1 downto 0 do k := k + 1;
  5. for i := 1 downto 1 do k := k + 1;
  6. for i := 1 downto 10 do k := k + 1;

Ψιτ! Δες και τα υπόλοιπα…

Το πρόβλημα της Αριθμομηχανής (2η έκδοση)

Να κατασκευαστεί πρόγραμμα σε γλώσσα Pascal το οποίο:

  1. Να εμφανίζει μενού επιλογών με τις επιλογές:
    Π. Πρόσθεση
    Α. Αφαίρεση
    Λ. Πολλαπλασιασμός
    Δ. Διαίρεση
    0. Έξοδος
  2. Να διαβάζει την επιλογή του χρήστη και κατόπιν δύο αριθμούς.
  3. Να υπολογίζει και να εμφανίζει το αποτέλεσμα της επιλεχθείσας πράξης.
  4. Η διαδικασία να επαναλαμβάνεται έως ότου επιλεγεί το 0 (μηδέν).

Υποδείξεις για το Θέμα: α) Να γίνει χρήση της εντολής case-of και να εμφανιστούν τα κατάλληλα μηνύματα σε περίπτωση που παρουσιαστεί κάποιο σφάλμα. β) Για την επιλογή πράξης να θεωρηθούν αποδεκτοί όλοι οι χαρακτήρες του πλήκτρου που πατήθηκε. Π.χ. αν πατήθηκε το πλήκτρο ‘Α’ θα πρέπει να αποδεχθούμε και τους 4 χαρακτήρες, Ελληνικούς και Αγγλικούς, ‘Α’, ‘α’, ‘A’ και ‘a’.

Ψιτ! Δες και τα υπόλοιπα…

Το πρόβλημα του Bungee jumping

Η ομάδα FearlessGR™ διοργανώνει άλματα Bungee jumping στην Ελλάδα. Για τη συμμετοχή ενός ατόμου σε άλμα, θα πρέπει αυτό να είναι μεγαλύτερο των 17 ετών και μικρότερο των 50 ετών.

Να κατασκευαστεί πρόγραμμα σε γλώσσα Pascal το οποίο:

  1. Να διαβάζει το ονοματεπώνυμο του υποψηφίου και την ηλικία του.
  2. Να υπολογίζει και να εμφανίζει μήνυμα αντίστοιχο του “Ο/Η Γιώργος Γάτος πληρεί τις προϋποθέσεις για άλμα!” ή του “Ο/Η Γιώργος Γάτος δεν πληρεί τις προϋποθέσεις για άλμα.” ανάλογα με τα στοιχεία που δόθηκαν.
  3. Η διαδικασία αυτή θα πρέπει να επαναλαμβάνεται έως ότου διαβαστεί είτε η λέξη “ΤΕΛΟΣ” για όνομα είτε αριθμός ≤0 για ηλικία.

Υπόδειξη: Για τον έλεγχο των δεδομένων θα πρέπει να χρησιμοποιηθεί η εντολή case-of.

Ψιτ! Δες και τα υπόλοιπα…

Το πρόβλημα της Αριθμομηχανής

Να κατασκευαστεί πρόγραμμα σε γλώσσα Pascal το οποίο:

  1. Να εμφανίζει μενού επιλογών με τις επιλογές:
    1. Πρόσθεση
    2. Αφαίρεση
    3. Πολλαπλασιασμός
    4. Διαίρεση
  2. Να διαβάζει την επιλογή του χρήστη και κατόπιν δύο αριθμούς.
  3. Να υπολογίζει και να εμφανίζει το αποτέλεσμα της επιλεχθείσας πράξης.

Υποδείξεις για το Θέμα: Να γίνει χρήση της εντολής case-of και να εμφανιστούν τα κατάλληλα μηνύματα σε περίπτωση που παρουσιαστεί κάποιο σφάλμα.

Ψιτ! Δες και τα υπόλοιπα…