Το πρόβλημα του ενυδρείου

Θέμα Γ’ των Πανελληνίων εξετάσεων 2011 του μαθήματος “Δομημένος Προγραμματισμός” σε Pascal

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

Τιμή εισιτηρίου ανά μαθητή 10 Ευρώ
1 έως και 20 μαθητές Κανένα δωρεάν εισιτήριο
21 έως και 40 μαθητές Δώρο το κόστος 5 εισιτηρίων
41 και άνω μαθητές Δώρο το κόστος 9 εισιτηρίων

Να γραφεί αλγόριθμος ο οποίος:

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

Υποδείξεις:

  1. Ο αλγόριθμος μπορεί να αποδοθεί: Με ψευδοκώδικα χρησιμοποιώντας τις εντολές που αναφέρονται στο σχετικό πίνακα του βιβλίου σας ή με στοιχεία (εντολές) της γλώσσας Pascal.
  2. Ο υπολογισμός δεν γίνεται κλιμακωτά. Για παράδειγμα σχολείο 50 μαθητών θα τύχει δώρου 9 εισιτηρίων και θα πληρώσει 410 Ευρώ.
  3. Δεν χρειάζεται να γίνει έλεγχος ορθότητας τιμών.

program Aquarium;

var
  TotalSchs, SchStuds: Integer;
  SchName: string;
  i, Amount: Integer;

begin
  Write('Δώστε τον αριθμό των σχολείων: ');
  Readln(TotalSchs);

  for i := 1 to TotalSchs do
  begin
    Write('Δώστε το όνομα του σχολείου: ');
    Readln(SchName);
    Write('Δώστε τον αριθμό των παιδιών του σχολείου: ');
    Readln(SchStuds);
    if SchStuds <= 20 then
      Amount := SchStuds * 10
    else
      if SchStuds <= 40 then
        Amount := (SchStuds - 5) * 10
      else
        Amount := (SchStuds - 9) * 10;
    Writeln('Το σχολείο ', SchName, ' θα πληρώσει ', Amount, '€');
  end;
end.
Advertisements

Posted on 15/12/2011, in Γλώσσα Pascal, Δομημένος Προγραμματισμός and tagged , , . Bookmark the permalink. Σχολιάστε.

Σχολιάστε

Εισάγετε τα παρακάτω στοιχεία ή επιλέξτε ένα εικονίδιο για να συνδεθείτε:

Λογότυπο WordPress.com

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό WordPress.com. Αποσύνδεση / Αλλαγή )

Φωτογραφία Twitter

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό Twitter. Αποσύνδεση / Αλλαγή )

Φωτογραφία Facebook

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό Facebook. Αποσύνδεση / Αλλαγή )

Φωτογραφία Google+

Σχολιάζετε χρησιμοποιώντας τον λογαριασμό Google+. Αποσύνδεση / Αλλαγή )

Σύνδεση με %s

Αρέσει σε %d bloggers: