ΨΕΥΔΟΚΩΔΙΚΑΣ

ΠΡΟΓΡΑΜΜΑ ΜΑΘΗΤΟΛΟΓΙΟ

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: ΑΠΟΥΣΙΕΣ, ΤΕΛΙΚΟΣ_ΒΑΘΜΟΣ

ΑΡΧΗ

  ΓΡΑΨΕ  'ΔΩΣΕ ΑΡΙΘΜΟ ΑΠΟΥΣΙΩΝ:'

  ΔΙΑΒΑΣΕ  ΑΠΟΥΣΙΕΣ

  ΓΡΑΨΕ  'ΔΩΣΕ ΤΕΛΙΚΗ ΒΑΘΜΟΛΟΓΙΑ:'

  ΔΙΑΒΑΣΕ  ΤΕΛΙΚΟΣ_ΒΑΘΜΟΣ

  ΑΝ ΑΠΟΥΣΙΕΣ>114 ΤΟΤΕ

    ΓΡΑΨΕ 'ΜΕΝΕΙ'

  ΑΛΛΙΩΣ_

ΑΝ ΤΕΛΙΚΟΣ_ΒΑΘΜΟΣ>10 ΤΟΤΕ

            ΓΡΑΨΕ 'ΠΕΡΝΑΕΙ'

            ΑΛΛΙΩΣ        

            ΓΡΑΨΕ 'ΜΕΝΕΙ'

  ΤΕΛΟΣ_ΑΝ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ  ΜΑΘΗΤΟΛΟΓΙΟ

ΠΡΟΓΡΑΜΜΑ Case1

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: x

ΑΡΧΗ

  ΓΡΑΨΕ 'Δώσε αριθμό '

  ΔΙΑΒΑΣΕ x

  ΕΠΙΛΕΞΕ   x

            ΠΕΡΙΠΤΩΣΗ   1

            ΓΡΑΨΕ   'ΕΝΑ'

            ΠΕΡΙΠΤΩΣΗ   2

            ΓΡΑΨΕ   'ΔΥΟ'

            ΠΕΡΙΠΤΩΣΗ   3

            ΓΡΑΨΕ   'ΤΡΙΑ'

            ΠΕΡΙΠΤΩΣΗ   4

            ΓΡΑΨΕ   'ΤΕΣΣΕΡΑ'

  ΤΕΛΟΣ_ΕΠΙΛΟΓΩΝ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΠΡΟΓΡΑΜΜΑ  loop1

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: x

ΑΡΧΗ

  ΓΙΑ x  ΑΠΟ 1  ΜΕΧΡΙ  5

    ΓΡΑΨΕ x

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΠΡΟΓΡΑΜΜΑ loop2

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: x

ΑΡΧΗ

  ΓΙΑ x ΑΠΟ 0  ΜΕΧΡΙ 100  ΜΕ ΒΗΜΑ 10

    ΓΡΑΨΕ x

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΠΡΟΓΡΑΜΜΑ loop3

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: x

ΑΡΧΗ

  ΓΙΑ x ΑΠΟ 100  ΜΕΧΡΙ 1  ΜΕ ΒΗΜΑ -1

    ΓΡΑΨΕ x

  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΠΡΟΓΡΑΜΜΑ  Loop4

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: x

ΑΡΧΗ

  x <-- 0

ΟΣΟ x<5 ΕΠΑΝΑΛΑΒΕ

 x <-- x+1

 ΓΡΑΨΕ x

ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΠΡΟΓΡΑΜΜΑ  Loop5

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: x

ΑΡΧΗ

  x <-- 0

  ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ

 x <-- x+1

    ΓΡΑΨΕ x

 ΜΕΧΡΙΣ_ΟΤΟΥ x>=5

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

ΠΡΟΓΡΑΜΜΑ Mesos_Oros2

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: B1, B2,B3

ΑΡΧΗ

  ΓΡΑΨΕ 'Δωσε 1ο Βαθμό '

  ΔΙΑΒΑΣΕ B1

  ΓΡΑΨΕ 'Δωσε 2ο Βαθμό '

  ΔΙΑΒΑΣΕ B2

  ΓΡΑΨΕ 'Δωσε 3ο Βαθμό '

  ΔΙΑΒΑΣΕ B3

  ΚΑΛΕΣΕ DMO(B1,B2,B3)

ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ Mesos_Oros2

ΔΙΑΔΙΚΑΣΙΑ DMO(X1, X2, X3)

ΜΕΤΑΒΛΗΤΕΣ

  ΑΚΕΡΑΙΕΣ: X1,X2,X3

  ΠΡΑΓΜΑΤΙΚΕΣ: MO

ΑΡΧΗ

MO <-- (X1+X2+X3)/3

ΓΡΑΨΕ MO

ΤΕΛΟΣ_ΔΙΑΔΙΚΑΣΙΑΣ