Εύρεση θέσης μέγιστου-ελάχιστου μεταξύ μεταβλητών

Εικόνα: ioarvanit
Posted Πέμ, 29/10/2009 - 14:58 by ioarvanit

Στο προηγούμενο μάθημα είδαμε πως μπορούμε να βρούμε τον μέγιστο μεταξύ 2 ή περισσοτέρων μεταβλητών. Σε πολλές περιπτώσεις είναι χρήσιμο να βρούμε εκτός από τον μέγιστο ή τον ελάχιστο και την σειρά του. Δηλαδή αν ο μέγιστος ήταν ο 1ος, ο 2ος κλπ κατά σειρά αριθμός που δόθηκε. Το παρακάτω πρόγραμμα λύνει αυτό το πρόβλημα, με την προϋπόθεση ότι όλοι οι αριθμοί που δίνονται είναι διαφορετικοί. Στην αντίθετη περίπτωση (δηλαδή αν ο μέγιστος αριθμός έχει διαβαστεί παραπάνω από μια φορά) θα επιστρέψει την σειρά του πρώτου.

  1. ΠΡΟΓΡΑΜΜΑ Θέση_μέγιστου_αριθμού
  2. ΜΕΤΑΒΛΗΤΕΣ
  3.   ΑΚΕΡΑΙΕΣ: α, ν, μέγιστος, i, θέση
  4. ΑΡΧΗ
  5.   ΓΡΑΨΕ "πόσους αριθμούς θα συγκρίνουμε;"
  6.   ΔΙΑΒΑΣΕ ν
  7.   ΓΡΑΨΕ "Δώσε ", ν, " αριθμούς"
  8.   ΔΙΑΒΑΣΕ α        !Διαβάζω την πρώτη τιμή
  9.   μέγιστος <- α    !Ορίζω ως μέγιστο τον πρώτο αριθμό
  10.   θέση <- 1        !Ορίζω την σειρά του μέγιστου σε 1
  11.   ΓΙΑ i ΑΠΟ 2 ΜΕΧΡΙ ν               !Διαβάζω τις υπόλοιπες τιμές
  12.     ΔΙΑΒΑΣΕ α
  13.     ΑΝ α > μέγιστος ΤΟΤΕ     !Αν ο τρέχων αριθμός είναι ο μέγιστος
  14.       μέγιστος <- α          !Ορίζω ως μέγιστο τον νέο αριθμό
  15.       θέση <- i              !και ορίζω και την νέα σειρά του μέγιστου
  16.     ΤΕΛΟΣ_ΑΝ
  17.   ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
  18.   ΓΡΑΨΕ "Ο μεγαλύτερος αριθμός που δόθηκε ήταν το ", μέγιστος, " και ήταν ο ", θέση, "ος αριθμός που δώσατε"
  19. ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ