!_______________________________________________________
!
! Να γραφεί αλγόριθμος που να δέχεται ένα έτος και να εμφανίζει
! αν είναι δίσκετο ή όχι.
! Υπενθυμίζεται ότι ένα έτος είναι δίσκετο :
! όταν διαιρείται με το 4 και δεν είναι έτος αιώνα
! ή όταν διαρείται με το 400
!_______________________________________________________
ΠΡΟΓΡΑΜΜΑ ΔΙΣΕΚΤΟ
ΜΕΤΑΒΛΗΤΕΣ
ΑΚΕΡΑΙΕΣ: x
ΑΡΧΗ
ΓΡΑΨΕ 'Δώσε μια χρονολογία.'
ΔΙΑΒΑΣΕ x
ΑΝ ((x MOD 4 = 0) ΚΑΙ (x MOD 100 <> 0)) Η (x MOD 400 = 0) ΤΟΤΕ
ΓΡΑΨΕ 'Το έτος ' , x , ' είναι δίσεκτο.'
ΑΛΛΙΩΣ
ΓΡΑΨΕ 'Το έτος ' , x , ' δεν είναι δίσκετο.'
ΤΕΛΟΣ_ΑΝ
ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ ΔΙΣΕΚΤΟ