For

Να γίνει πρόγραμμα σε Pascal το οποίο βρίσκει τη μεγαλύτερη τιμή από ένα πλήθος τιμών που επιθυμεί ο χρήστης. Το πρόγραμμα πρέπει να υλοποιεί τα παρακάτω:
 
  1. Διαβάζει το πλήθος των τιμών που θέλει να εισάγει ο χρήστης, κάνοντας έλεγχο εγκυρότητας για το πλήθος το οποίο πρέπει να είναι στο διάστημα τιμών 1 έως και 20. Στην περίπτωση λανθασμένης πληκτρολόγησης το πλήθος πρέπει να εισάγεται ξανά.
  2. Καλεί διαδικασία με όνομα MAX η οποία δέχεται το πλήθος των τιμών που θα εισαχθούν και στην συνέχεια διαβάζει τις τιμές και επιστρέφει τη μεγαλύτερη τιμή στο πρόγραμμα.
  3. Εμφανίζει τη μεγαλύτερη τιμή από αυτές που δόθηκαν.
Σε όλες τις εντολές εισόδου και εξόδου να υπάρχουν κατάλληλα διαμορφωμένα μηνύματα.
 
Μια επιχείρηση έχει 60 υπαλλήλους. Να γραφεί πρόγραμμα σε Pascal το οποίο να:
  • διαβάσει επαναληπτικά το όνομα και τον μηνιαίο μισθό κάθε υπαλλήλου της επιχείρησης,
  • να βρίσκει και να εμφανίζει το όνομα του πιο ακριβοπληρωμένου υπαλλήλου καθώς και τον μισθό του,
  • να εμφανίζει το συνολικό ποσό που πρέπει να καταβάλλει η επιχείρηση στους υπαλλήλους της.

Θεωρήστε ότι ο μηνιαίος μισθός είναι θετικός ακέραιος αριθμός.

Στα πλαίσια ενός προγράμματος ανακύκλωσης, ο Δήμαρχος μιας πόλης αποφάσισε να καλέσει τα 40 σχολεία του νομού να μαζέψουν ποσότητες χαρτιού και αλουμινίου. Να γίνει πρόγραμμα σε γλώσσα προγραμματισμού Pascal το οποίο:
  • Για κάθε ένα από τα 40 σχολεία, να διαβάζει την ονομασία του και τις ποσότητες χαρτιού και αλουμίνιου σε κιλά (πραγματικός αριθμός). Να γίνεται έλεγχος δεδομένων εισόδου για τις ποσότητες χαρτιού και αλουμινίου που πρέπει να είναι θετικές τιμές.
  • Να βρίσκει και να εμφανίζει τον αριθμό των σχολείων που συγκέντρωσαν ποσότητα χαρτιού μεγαλύτερη από 100 κιλά.
  • Να βρίσκει και να εμφανίζει τον αριθμό των σχολείων που δε συγκέντρωσαν χαρτί.
  • Να βρίσκει το σχολείο που συγκέντρωσε την μεγαλύτερη ποσότητα σε αλουμίνιο και να εμφανίζεται με κατάλληλο μήνυμα το όνομα του σχολείου και η ποσότητα του αλουμινίου.
Εκατό (100) ζωγράφοι λαμβάνουν μέρος σε διεθνή διαγωνισμό ζωγραφικής. Κάθε ζωγράφος παραδίδει στην κριτική επιτροπή του διαγωνισμού ένα έργο του/της για να βαθμολογηθεί, η βαθμολογική κλίμακα είναι από το 1 έως και το 100. Να κατασκευάσετε πρόγραμμα το οποίο:
  1. Για κάθε ζωγράφο διαβάζει το όνομά του/της, την ονομασία του έργου του/της καθώς και τη βαθμολογία που έδωσε στο έργο η κριτική επιτροπή.
  2. Υπολογίζει το καλύτερα βαθμολογημένο έργο (υποθέστε ότι είναι μόνο 1) και εμφανίζει με κατάλληλα μηνύματα το όνομα του ζωγράφου, την ονομασία του έργου καθώς και τη βαθμολογία που πήρε από την κριτική επιτροπή.