Στο τέταρτο θέμα προσομοίωσης στο δεύτερο θέμα ζητάει να κάνουμε διαδικασία ΠΑΡ στην οποία καταχωρείται στον πίνακα δυο διαστάσεων ΑΠ ο αριθμός παραγγελιών 1500 πελατών για κάθε μήνα ενός έτους (εκτός μήνα Αύγουστο). Κάθε καταχώρηση πρέπει να ελέγχεται ως προς την εγκυρότητα της, δηλ. να είναι μεγαλύτερη του μηδενός. Για το μήνα παύσης καταχωρείται μηδέν.
Διαδικασια ΠΑΡ (ΑΠ)
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ ΑΠ[1500], ί, j
ΑΡΧΗ
ΓΙΑ ί ΑΠΟ 1 ΜΕΧΡΙ 1500
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 12
ΑΝ j=8 ΤΟΤΕ
ΑΠ[ί, j] <- 0
ΑΛΛΙΩΣ
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ ΑΠ[ί, j]
ΜΕΧΡΙΣ_ΟΤΟΥ ΑΠ[ί, j] >0
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
Είναι λάθος πριν διαβάσουμε το στοιχείο να πάρουμε αν ΑΝ j=8 ΤΟΤΕ. Αν ναι πως θα μπορούσε να γίνει με ΑΡΧΗ _ΕΠΑΝΑΛΗΨΗΣ??
Καλησπέρα,
εγώ προσωπικά Kiro δε βρίσκω κάποιο λάθος στον τρόπο σου.
Νίκος Ξ.
Πίστευα πως δεν είναι πολύ σωστό να πάρω συνθήκη για το j πριν διαβάσω το στοιχείο του πίνακα
ΓΙΑ ί ΑΠΟ 1 ΜΕΧΡΙ 1500
ΓΙΑ j ΑΠΟ 1 ΜΕΧΡΙ 12
ΑΝ j=8 ΤΟΤΕ
ΓΙΑ I ΑΠΟ Ι ΜΕΧΡΙ 1500
ΓΙΑ J ΑΠΟ 1 ΜΕΧΡΙ 7
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ ΑΠ[ί, j]
ΜΕΧΡΙΣ_ΟΤΟΥ ΑΠ[ί, j] >0
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΠ[I,8]<--0
ΓΙΑ J ΑΠΟ 9 ΜΕΧΡΙ 12
ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ
ΔΙΑΒΑΣΕ ΑΠ[ί, j]
ΜΕΧΡΙΣ_ΟΤΟΥ ΑΠ[ί, j] >0
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
kiro,
ΑΚΕΡΑΙΕΣ ΑΠ[1500], ί, j
ΑΚΕΡΑΙΕΣ : ΑΠ[1500,12], ί, j