Άγριος βιασμός με θύμα ανήλικη "Είδαν" πλανήτη 5.000 έτη φωτός από τη Γη

8.2.2 Εντολή ΜΕΧΡΙΣ_ΟΤΟΥ

Άγριος βιασμός με θύμα μία 15χρονη μαθήτρια σημειώθηκε χθες στην κοινότητα Αγίου Αθανασίου της Δράμας. Με μια νέα τεχνική που θα χρησιμοποιηθεί για να ανακαλυφθούν πλανήτες που μοιάζουν με τη Γη, αστρονόμοι εντόπισαν έναν μακρινό πλανήτη έξω από το ηλιακό μας σύστημα, έναν παράξενο τόπο με υψηλές θερμοκρασίες, σύννεφα και σταγόνες βροχής από σίδηρο. Η δεύτερη εντολή επανάληψης που χρησιμοποιεί η ΓΛΩΣΣΑ είναι η εντολή ΜΕΧΡΙΣ_ΟΤΟΥ. Συγκεκριμένα, σύμφωνα με την καταγγελία της Κ. Χ. στους αστυνομικούς του τμήματος Δοξάτου Δράμας, οι Παντελής Τσακονίδης και Κυριάκος Λεωντιάδης, 27 και 34 χρόνων αντίστοιχα, και οι δύο από τον Άγιο Αθανάσιο, την πλησίασαν με επιβατικό αυτοκίνητο ενώ περπατούσε σε δρόμο του χωριού της προχθές στις επτά το απόγευμα.

Μια ομάδα του Κέντρου Αστροφυσικής Χάρβαρντ - Σμιθσόνιαν ανακάλυψε τον πλανήτη σε τροχιά γύρω από ένα άστρο σε απόσταση 5.000 ετών φωτός, εντοπίζοντας μια ελαφρά αλλαγή στο φως που εξέπεμπε το άστρο, καθώς ο πλανήτης εκινείτο ανάμεσα σε αυτό και τα τηλεσκόπια στη Γη.

Σε αυτή οι εντολές του βρόχου εκτελούνται μέχρις ότου ικανοποιηθεί κάποια συνθήκη η οποία ελέγχεται στο τέλος της επανάληψης.

Χρησιμοποιώντας βία οι δύο άντρες επιβίβασαν στο αυτοκίνητό τους την ανήλικη μαθήτρια και την οδήγησαν στο σπίτι του Λεωντιάδη. Αυτή η εξελιγμένη τεχνική συγκρίνεται με τον εντοπισμό της σκιάς που δημιουργεί ένα κουνούπι το οποίο πετάει μπροστά από έναν φακό 300 χιλιόμετρα μακριά.

Σύνταξη ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ εντολή-1 εντολή-2 …εντολή-ν ΜΕΧΡΙΣ_ΟΤΟΥ λογική-έκφραση Παράδειγμα ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΔΙΑΒΑΣΕ Α Άθροισμα = 1000 Λειτουργία Εκτελούνται οι εντολές μεταξύ των ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ και ΜΕΧΡΙΣ_ΟΤΟΥ. Στη συνέχεια ελέγχεται η λογική έκφραση και αν δεν ισχύει (είναι ψευδής), τότε οι εντολές που βρίσκονται ανάμεσα στις ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ και ΜΕΧΡΙΣ_ΟΤΟΥ, εκτελούνται πάλι. Ελέγχεται ξανά η λογική έκφραση και αν δεν ισχύει, επαναλαμβάνεται η εκτέλεση των ίδιων εντολών. Όταν η λογική έκφραση γίνει Αληθής τότε σταματάει η επανάληψη και εκτελείται η εντολή μετά από την ΜΕΧΡΙΣ_ΟΤΟΥ.

Εκεί την αναισθητοποίησαν αναγκάζοντάς τη να πιει αλκοόλ και στη συνέχεια τη βίασαν. Περισσότεροι από 100 πλανήτες εκτός του ηλιακού μας συστήματος έχουν ανακαλυφθεί με τη μέτρηση της ταλάντευσης του άστρου την οποία προκαλεί η βαρύτητα του πλανήτη.

Πολύ συχνά η ίδια επαναληπτική διαδικασία μπορεί να γραφεί εξίσου σωστά χρησιμοποιώντας είτε τη δομή ΟΣΟ…ΕΠΑΝΑΛΑΒΕ είτε τη δομή ΜΕΧΡΙΣ_ΟΤΟΥ και είναι προσωπική επιλογή του προγραμματιστή ποια από τις δυο θα χρησιμοποιήσει. Η 15χρονη μαθήτρια κατάγγειλε το επεισόδιο στην αστυνομία Δοξάτου, χθες στις οκτώ το πρωί, και λίγη ώρα αργότερα οι δύο άντρες συνελήφθησαν και με τη δικογραφία που σχηματίστηκε σε βάρος τους θα οδηγηθούν στον εισαγγελέα.

Η νέα ανακάλυψη ήταν η πρώτη για την οποία χρησιμοποιήθηκε η νέα τεχνική, η οποία αποκαλείται μέθοδος της διάβασης και εντοπίζει τις μικρές αλλαγές του φωτός που εκπέμπει το άστρο.

Υπάρχουν όμως περιπτώσεις όπου η χρήση της εντολής ΜΕΧΡΙΣ_ΟΤΟΥ οδηγεί σε απλούστερα και πιο ευκολονόητα προ γράμματα.

Τα χαρακτηριστικά του

Γενικά σε περιπτώσεις όπου η επανάληψη θα συμβεί υποχρεωτικά μία φορά, είναι προτιμότερη η χρήση της ΜΕΧΡΙΣ_ΟΤΟΥ.

Ο πλανήτης που ανακαλύφθηκε είναι ελαφρώς μικρότερος από τον Δία. Χαρακτηριστική περίπτωση όπου προτιμάται η εντολή ΜΕΧΡΙΣ_ΟΤΟΥ είναι στον έλεγχο αποδεκτών τιμών καθώς και στην επιλογή από προκαθορισμένες απαντήσεις ή μενού. Βρίσκεται σε τροχιά πολύ κοντά στο άστρο του, περίπου στο ένα πέμπτο της απόστασης ανάμεσα στη Γη και τον Ήλιο.

Παράδειγμα 3

Αυτή η τροχιά σημαίνει πως ο πλανήτης πραγματοποιεί μια πλήρη περιστροφή γύρω από το άστρο του κάθε 29 ώρες.

Στο προηγούμενο παράδειγμα ας υποθέσουμε ότι οι μετρήσεις είναι υποχρεωτικά θετικοί αριθμοί και ότι μετά την εισαγωγή κάθε αριθμού υπάρχει η ερώτηση, αν θα εισάγουμε άλλο.

Επειδή βρίσκεται τόσο κοντά στο άστρο του, η θερμοκρασία της ατμόσφαιρας του νέου πλανήτη φτάνει τους 1.700 βαθμούς Κελσίου.

Η διαδικασία θα τελειώσει, όταν η απάντηση θα είναι Όχι (ο ή Ο).

"Είναι ο πιο θερμός πλανήτης που γνωρίζουμε", δήλωσε ο Σασελόφ, επικεφαλής της ομάδας του Χάρβαρντ - Σμιθσόνιαν.

ΠΡΟΓΡΑΜΜΑ Αθροισμα2

"Είναι αρκετά ζεστός για να έχει ομίχλη από σίδηρο και βροχή από καυτές σιδερένιες σταγόνες".

ΜΕΤΑΒΛΗΤΕΣ

Ο νέος πλανήτης ονομάστηκε OGLE-TR-56b.

ΑΚΕΡΑΙΕΣ:Χ, Άθροισμα, Πλήθος ΠΡΑΓΜΑΤΙΚΕΣ:ΜΟ ΧΑΡΑΚΤΗΡΕΣ:Επιλογή Πλήθος Άθροισμα ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ΑΡΧΗ_ΕΠΑΝΑΛΗΨΗΣ ! Έλεγχος δεδομένων ΓΡΑΨΕ `Δώσε Αριθμό' ΔΙΑΒΑΣΕ Χ ΑΝ Χ= ΓΡΑΨΕ `Λάθος Αριθμός, Παρακαλώ δώστε ξανά…' ΤΕΛΟΣ_ΑΝ ! Αν το Χ δεν είναι θετικό εισάγουμε νέο αριθμό ΜΕΧΡΙΣ_ΟΤΟΥ Χ>0 Άθροισμα Πλήθος ΓΡΑΨΕ `Νέα μέτρηση ;' ΔΙΑΒΑΣΕ Επιλογή ! Αν η επιλογή είναι Ο ή ο τότε σταματάει η επανάληψη ΜΕΧΡΙΣ_ΟΤΟΥ Επιλογή ='Ο' Η Επιλογή ='ο' ΜΟ ΓΡΑΨΕ `Άθροισμα =', Άθροισμα ΓΡΑΨΕ `Μέσος όρος =', ΜΟ ΤΕΛΟΣ_ΠΡΟΓΡΑΜΜΑΤΟΣ

Η εντολή επανάληψης ΜΕΧΡΙΣ_ΟΤΟΥ εκτελείται υποχρεωτικά τουλάχιστον μία φορά

Προγραμματιστικό περιβάλλον Pascal

PROGRAM athroisma2; VAR x,sum,count:INTEGER; avg:REAL; choice:CHAR; BEGIN count:=0;sum:=0; REPEAT REPEAT write(`Δώσε αριθμό:'); readln (x); IF x UNTIL x>0; sum:=sum+x; count:=count+1; write(`Νέα μέτρηση;'); readln(choice); UNTIL (choice='o') OR (choice='O'); avg:=sum/count; writeln(`Άθροισμα: `, sum:5); writeln(`Μέσος όρος: `,avg: 6:2); END.