ΠΡΟΓΡΑΜΜΑ ΜΟ_μαθηματων_Β_γενικού_λυκείου
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: ΜΑΘ, ΑΛΓ, ΘΡΗ, ΑΝΤ, ΔΙΚ, ΦΥΣ, ΦΥΣΚ, ΑΓΓ, ΚΕΙ, ΓΛΩ, ΙΣΤ, ΤΕΧ, ΒΙΟ, ΑΣΤ
ΧΑΡΑΚΤΗΡΕΣ: ΟΝΟ
ΑΡΧΗ
ΓΡΑΨΕ 'Δώσε Όνομα Μαθητή:'
ΔΙΑΒΑΣΕ ΟΝΟ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Θρησκευτικών:'
ΔΙΑΒΑΣΕ ΘΡΗ
ΟΣΟ ΘΡΗ>20 ΕΠΑΝΑΛΑΒΕ
γράψε 'Ο βαθμός δεν θα πρέπει να ξεπερνά το 20'
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος θρησκευτικών: (<=20)'
ΔΙΑΒΑΣΕ ΘΡΗ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Αντιγόνης:'
ΔΙΑΒΑΣΕ ΑΝΤ
ΟΣΟ ΑΝΤ>20 ΕΠΑΝΑΛΑΒΕ
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Αντιγόνης: (<=20)'
ΔΙΑΒΑΣΕ ΑΝΤ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Λογοτεχνίας:'
ΔΙΑΒΑΣΕ ΚΕΙ
ΟΣΟ ΚΕΙ>20 ΕΠΑΝΑΛΑΒΕ
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Λογοτεχνίας: (<=20)'
ΔΙΑΒΑΣΕ ΚΕΙ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό Νεοελληνικής Γλώσσας (Έκθεσης):'
ΔΙΑΒΑΣΕ ΓΛΩ
ΟΣΟ ΓΛΩ>20 ΕΠΑΝΑΛΑΒΕ
Γραψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Νεοελληνικής Γλώσσας (Έκθεσης): (<=20)'
ΔΙΑΒΑΣΕ ΓΛΩ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Ιστορίας:'
ΔΙΑΒΑΣΕ ΙΣΤ
ΟΣΟ ΙΣΤ>20 ΕΠΑΝΑΛΑΒΕ
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Ιστορίας: (<=20)'
ΔΙΑΒΑΣΕ ΙΣΤ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Άλγεβρας:'
ΔΙΑΒΑΣΕ ΑΛΓ
όσο ΑΛΓ>20 επαναλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Άλγεβρας: (<=20)'
διάβασε ΑΛΓ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Μαθηματικών (Κατεύθυνσης):'
ΔΙΑΒΑΣΕ ΜΑΘ
όσο ΜΑΘ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Μαθηματικών (Κατεύθυνσης): (<=20)'
Διαβασε ΜΑΘ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Φυσικής (Γενικής Παιδείας):'
ΔΙΑΒΑΣΕ ΦΥΣ
όσο ΦΥΣ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Φυσικής (Γενικής Παιδείας): (<=20)'
Διαβασε ΦΥΣ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Φυσικής (Κατεύθυνσης):'
ΔΙΑΒΑΣΕ ΦΥΣΚ
όσο ΦΥΣΚ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Φυσικής (Κατεύθυνσης): (<=20)'
διάβασε ΦΥΣΚ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Δικαίου:'
ΔΙΑΒΑΣΕ ΔΙΚ
όσο ΔΙΚ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνάει το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Δικαίου: (<=20)'
διάβασε ΔΙΚ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Τεχνολογίας Επικοινωνιών:'
ΔΙΑΒΑΣΕ ΤΕΧ
όσο ΤΕΧ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Τεχνολογίας Επικοινωνιών: (<=20)'
διάβασε ΤΕΧ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Βιολογίας:'
ΔΙΑΒΑΣΕ ΒΙΟ
όσο ΒΙΟ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Βιολογίας: (<=20)'
διάβασε ΒΙΟ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Αστρονομίας:'
ΔΙΑΒΑΣΕ ΑΣΤ
όσο ΑΣΤ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Αστρονομίας: (<=20)'
διάβασε ΑΣΤ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Δώσε βαθμό διαγωνίσματος Αγγλικών:'
ΔΙΑΒΑΣΕ ΑΓΓ
όσο ΑΓΓ>20 επανάλαβε
γράψε 'Ο βαθμός δεν πρέπει να ξεπερνά το 20'
γράψε 'Δώσε βαθμό διαγωνίσματος Αγγλικών: (<=20)'
διάβασε ΑΓΓ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΓΡΑΨΕ 'Ο Μέσος Όρος του μαθητή', ΟΝΟ,'είναι:', (ΘΡΗ+ΑΝΤ+ΚΕΙ+ΓΛΩ+ΙΣΤ+ΑΛΓ+ΜΑΘ+ΦΥΣ+ΦΥΣΚ+ΒΙΟ+ΔΙΚ+ΤΕΧ+ΑΓΓ+ΑΣΤ)/14
ΑΝ (ΘΡΗ+ΑΝΤ+ΚΕΙ+ΓΛΩ+ΙΣΤ+ΑΛΓ+ΜΑΘ+ΦΥΣ+ΦΥΣΚ+ΔΙΚ+ΤΕΧ+ΑΓΓ+ΒΙΟ+ΑΣΤ)/14<10 ΤΟΤΕ
ΓΡΑΨΕ 'Ο μαθητής', ΟΝΟ,'ΑΠΟΡΡΙΠΤΕΤΑΙ'
ΑΛΛΙΩΣ_ΑΝ (ΘΡΗ+ΑΝΤ+ΚΕΙ+ΓΛΩ+ΙΣΤ+ΑΛΓ+ΜΑΘ+ΦΥΣ+ΦΥΣΚ+ΔΙΚ+ΤΕΧ+ΑΓΓ+ΒΙΟ+ΑΣΤ)/14>=10 ΤΟΤΕ
ΓΡΑΨΕ 'Ο μαθητής', ΟΝΟ,'ΠΡΟΑΓΕΤΑΙ'
ΤΕΛΟΣ_ΑΝ
ΓΡΑΨΕ 'leonidasmark@gmail.com'
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΜΟ_μαθηματων_Β_γενικού_λυκείου