ΠΡΟΓΡΑΜΜΑ Απουσιολόγιο
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΑΠ[6, 30], Σ[6, 2], ΜΗΝΑΣ, i, j, ΑΠΟΥΣΙΕΣ1, ΑΠΟΥΣΙΕΣ2, ΣΥΝΟΛΟ[6], ΜΕΓΙΣΤΟ1, ΜΕΓΙΣΤΟ2
ΧΑΡΑΚΤΗΡΕΣ: ΟΝΟΜΑ
ΑΡΧΗ
ΓΡΑΨΕ "Δώσε το όνομα του εκπαιδευόμενου"
ΔΙΑΒΑΣΕ ΟΝΟΜΑ
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 6
ΓΙΑ j ΑΠΟ 1 ΕΩΣ 30
ΔΙΑΒΑΣΕ ΑΠ[i, j]
ΑΝ ΑΠ[i, j] < 0 Ή ΑΠ[i, j] > 5 ΤΟΤΕ
ΓΡΑΨΕ "Λάθος δεδομένα, δώσε ξανά τα δεδομένα"
ΔΙΑΒΑΣΕ ΑΠ[i, j]
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΠΟΥΣΙΕΣ1 <- 0
ΑΠΟΥΣΙΕΣ2 <- 0
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 6
ΓΙΑ j ΑΠΟ 1 ΕΩΣ 15
ΑΠΟΥΣΙΕΣ1 <- ΑΠΟΥΣΙΕΣ1 + ΑΠ[i, j]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
Σ[i, 1] <- ΑΠΟΥΣΙΕΣ1
ΓΙΑ j ΑΠΟ 16 ΕΩΣ 30
ΑΠΟΥΣΙΕΣ2 <- ΑΠΟΥΣΙΕΣ2 + ΑΠ[i, j]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
Σ[i, 2] <- ΑΠΟΥΣΙΕΣ2
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΙΑ i ΑΠΟ 1 ΕΩΣ 6
ΣΥΝΟΛΟ[i] <- Σ[i, 1] + Σ[i, 2]
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΜΕΓΙΣΤΟ1 <- ΣΥΝΟΛΟ[1]
ΜΗΝΑΣ <- 1
ΓΙΑ i ΑΠΟ 2 ΕΩΣ 6
ΑΝ ΜΕΓΙΣΤΟ1 < ΣΥΝΟΛΟ[i] ΤΟΤΕ
ΜΕΓΙΣΤΟ1 <- ΣΥΝΟΛΟ[i]
ΜΗΝΑΣ <- i
ΑΛΛΙΩΣ_ΑΝ ΜΕΓΙΣΤΟ1 = ΣΥΝΟΛΟ[i] ΤΟΤΕ
ΜΕΓΙΣΤΟ2 <- Σ[ΜΗΝΑΣ, 1]
ΑΝ ΜΕΓΙΣΤΟ2 < Σ[i, 1] ΤΟΤΕ
ΜΕΓΙΣΤΟ2 <- Σ[i, 1]
ΜΗΝΑΣ <- i
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ "Ο μήνας με τις περισσότερες απουσίες για τον εκπαιδευόμενο είναι ο ", ΜΗΝΑΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ