!=======================================================================
! ΤΟ ΠΑΡΑΚΑΤΩ ΠΡΟΓΡΑΜΜΑ ΔΕΧΕΤΑΙ ΣΑΝ ΕΙΣΟΔΟ ΕΝΑΝ ΑΚΕΡΑΙΟ ΚΑΙ ΕΜΦΑΝΙΖΕΙ
! ΟΛΟΥΣ ΤΟΥΣ ΠΡΩΤΟΥΣ ΑΡΙΘΜΟΥΣ ΜΕΧΡΙ ΤΟΝ ΑΚΕΡΑΙΟ ΠΟΥ ΔΟΘΗΚΕ.
!=======================================================================
ΠΡΟΓΡΑΜΜΑ ΠΡΩΤΟΙ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: N,I,J,P,Q
ΛΟΓΙΚΕΣ: F
ΑΡΧΗ
ΓΡΑΨΕ 'ΔΩΣΤΕ ΕΝΑΝ ΑΚΕΡΑΙΟ'
ΔΙΑΒΑΣΕ N
ΓΙΑ P ΑΠΟ 1 ΜΕΧΡΙ N
F <-- ΑΛΗΘΗΣ
Q <-- P DIV 2
I <-- 2
ΟΣΟ (I<=Q) ΚΑΙ (F=ΑΛΗΘΗΣ) ΕΠΑΝΑΛΑΒΕ
ΑΝ P MOD I =0 ΤΟΤΕ
F <-- ΨΕΥΔΗΣ
ΑΛΛΙΩΣ
I <-- I+1
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΑΝ F=ΑΛΗΘΗΣ ΤΟΤΕ
ΓΡΑΨΕ 'Ο ',P,' ΕΙΝΑΙ ΠΡΩΤΟΣ'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ