30 ΠΡΩΤΟΙ Λυση

Ενδεικτική λύση της άσκησης ευρεσης 30 ΠΡΩΤΩΝ αριθμών.
Μπορείτε να τη βελτιώσετε;


Αλγόριθμος Πρωτοι30
  μετρητης ← 1
  τρεχον_αριθμος ←  3
  ΟΣΟ μετρητης <= 30 ΕΠΑΝΑΛΑΒΕ
    πρωτος ←  ΑΛΗΘΗΣ


    ΓΙΑ διαιρετης ΑΠΟ 2 ΜΕΧΡΙ τρεχον_αριθμος - 1

      ΑΝ τρεχον_αριθμος MOD διαιρετης = 0 ΤΟΤΕ
        πρωτος ←  ΨΕΥΔΗΣ
      ΤΕΛΟΣ_ΑΝ
    ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ
    ΑΝ πρωτος ΤΟΤΕ
      μετρητης ←  μετρητης + 1
      ΓΡΑΨΕ τρεχον_αριθμος
    ΤΕΛΟΣ_ΑΝ
    τρεχον_αριθμος ←  τρεχον_αριθμος + 1
  ΤΕΛΟΣ_ΕΠΑΝΑΛΗΨΗΣ

ΤΕΛΟΣ Πρωτοι30