Να γίνει πρόγραμμα σε pascal που θα ζητάει έναν αριθμό και θα εμφανίζει τα μηνύματα:
ΑΡΝΗΤΙΚΟΣ αν ο αριθμός είναι μικρότερος από το 0
ΜΗΔΕΝ αν ο αριθμός είναι ίσος με το 0
ΘΕΤΙΚΟΣ αν ο αριθμός είναι μεγαλύτερος από το
Λύση
ΑΡΝΗΤΙΚΟΣ αν ο αριθμός είναι μικρότερος από το 0
ΜΗΔΕΝ αν ο αριθμός είναι ίσος με το 0
ΘΕΤΙΚΟΣ αν ο αριθμός είναι μεγαλύτερος από το
Λύση