ΠΡΟΓΡΑΜΜΑ ΒΡΑΔ2001_Θ2
!Υποψήφιος αγοραστής οικοπέδου μετά από επίσκεψη σε μεσιτικό 
!γραφείο πώλησης ακινήτων πήρε τις εξής πληροφορίες: 
!Ένα οικόπεδο θεωρείται "ακριβό", όταν η τιμή πώλησης ανά 
!τετραγωνικό μέτρο είναι μεγαλύτερη των 140.000 δραχμών, 
!"φτηνό" όταν η τιμή πώλησης είναι μικρότερη των 50.000 δραχμών 
! και σε οποιαδήποτε άλλη περίπτωση η τιμή θεωρείται "κανονική". 
!Να αναπτύξετε αλγόριθμο που για καθένα από 50 οικόπεδα: 
!1. να διαβάζει την τιμή πώλησης ολόκληρου του οικοπέδου και 
!τον αριθμό των τετραγωνικών μέτρων του, 
!2. να υπολογίζει την κατηγορία κόστους στην οποία ανήκει 
!και να εμφανίζει το μήνυμα: "ακριβή τιμή" ή "φτηνή τιμή" ή 
!"κανονική τιμή". 
  
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: i    
  ΠΡΑΓΜΑΤΙΚΕΣ: τιμή_πώλησης, τετραγωνικά, τιμή_μέτρου 
  ΧΑΡΑΚΤΗΡΕΣ: κατηγορία 
  
ΑΡΧΗ
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ 50
                                                              !1
    ΓΡΑΨΕ 'Δώσε τιμή πώλησης ολόκληρου του', i, ' οικοπέδου: '
    ΔΙΑΒΑΣΕ τιμή_πώλησης 
    ΓΡΑΨΕ 'Δώσε αριθμό των τετραγωνικών μέτρων : '
    ΔΙΑΒΑΣΕ τετραγωνικά 
    
                                                              !2 
    ΑΝ τετραγωνικά > 0 ΤΟΤΕ 
      τιμή_μέτρου <- τιμή_πώλησης/ τετραγωνικά 
      ΑΝ τιμή_μέτρου > 140000 ΤΟΤΕ 
        κατηγορία <- 'ακριβή τιμή'
      ΑΛΛΙΩΣ_ΑΝ τιμή_μέτρου < 50000 ΤΟΤΕ 
        κατηγορία <- 'φτηνή τιμή'
      ΑΛΛΙΩΣ 
        κατηγορία <- 'κανονική τιμή'
      ΤΕΛΟΣ_ΑΝ 
      
      ΓΡΑΨΕ κατηγορία 
    ΤΕΛΟΣ_ΑΝ 
    
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ 
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ