Γλωσσομάθεια ΑΕΠΠ

 

 

 

ΠΡΟΓΡΑΜΜΑ ΔΙΑΜΕΣΟΣ
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: i, Ν, Χ[10], ΝΖ, ΝΜ, j
  ΠΡΑΓΜΑΤΙΚΕΣ: Διάμεσος
ΑΡΧΗ
! Εισαγωγή δεδομένων
  ΓΡΑΨΕ ‘Δώσε το πλήθος των αριθμών 10)’
  ΔΙΑΒΑΣΕ Ν
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
    ΓΡΑΨΕ ‘Δώσε τον ‘, i, ‘-το αριθμό’
    ΔΙΑΒΑΣΕ Χ[i]
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
!Υπολογισμός διαμέσου
  ΑΝ Ν mod 2 = 0 ΤΟΤΕ
    Διάμεσος <– (Χ[Ν div 2] + Χ[(Ν div 2)] + 1)/2       ! ΑΡΤΙΟΣ
  ΑΛΛΙΩΣ
    Διάμεσος <– Χ[(Ν + 1) div 2]               ! ΠΕΡΙΤΤΟΣ
  ΤΕΛΟΣ_ΑΝ
! Εκτύπωση αποτελεσμάτων
  ΓΡΑΨΕ ‘ΑΠΟΤΕΛΕΣΜΑΤΑ’
  ΓΡΑΨΕ ‘============’
  ΓΡΑΨΕ ‘Πλήθος τιμών =’, Ν
  ΓΡΑΨΕ ‘Διάμεσος = ‘, Διάμεσος
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ
*-*-*-**-*-*-*-*-*-*-*-*–*-*-**-*-*-**-*-*-*-*-*-*-*-*–*-*-*
ΠΡΟΓΡΑΜΜΑ Στατιστική
ΜΕΤΑΒΛΗΤΕΣ
  ΑΚΕΡΑΙΕΣ: i, Ν, Χ[5], Άθροισμα, Άθροισμα_2, Βοηθητική, ΝΖ, ΝΜ, j! Παρόραμα δεν δηλώθηκε η j
  ΠΡΑΓΜΑΤΙΚΕΣ: ΜΤ, Τυπ_Απόκλιση, Διάμεσος
ΑΡΧΗ
! Εισαγωγή δεδομένων
  ΓΡΑΨΕ ‘Δώσε το πλήθος των αριθμών (5)’
  ΔΙΑΒΑΣΕ Ν
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
    ΓΡΑΨΕ ‘Δώσε τον ‘, i, ‘-το αριθμό’
    ΔΙΑΒΑΣΕ Χ[i]
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! Υπολογισμός αθροισμάτων
  Άθροισμα <– 0
  Άθροισμα_2 <– 0
  ΓΙΑ i ΑΠΟ 1 ΜΕΧΡΙ Ν
    Άθροισμα <– Άθροισμα + Χ[i]
    Άθροισμα_2 <– Άθροισμα_2 + Χ[i]^2
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
! Υπολογισμός μέσου όρου
  ΜΤ <– Άθροισμα/Ν
!Υπολογισμός τυπικής απόκλισης
  Τυπ_Απόκλιση <– Τ_Ρ(Άθροισμα_2/Ν – ΜΤ^2)
! Εκτύπωση αποτελεσμάτων
  ΓΡΑΨΕ ‘ΑΠΟΤΕΛΕΣΜΑΤΑ’
  ΓΡΑΨΕ ‘============’
  ΓΡΑΨΕ ‘Πλήθος τιμών =’, Ν
  ΓΡΑΨΕ ‘Μέση τιμή = ‘, ΜΤ
  ΓΡΑΨΕ ‘Τυπική απόκλιση = ‘, Τυπ_Απόκλιση
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ