corduroy Δημοσ. 4 Ιουνίου 2001 Δημοσ. 4 Ιουνίου 2001 παιδια,χρειαζομαι την βοηθεια σας...εχω να δωσω κατι εξετασεις και διαβαζω την basic.(δεν εχω καμια ιδιαιτερη σχεση με προγραμματισμο,γιατρος ειμαι).το προβλημα ειναι οτι δεν μπορω να καταλαβω πολυ καλα την εντολη IF-THEN-ELSE οπως επισης και την FOR-NEXT.μηπως θα μπορουσε καποιος να μου την εξηγησει με απλα λογια και με καποιο παραδειγμα ( ΑΠΛΟ ΒΕΒΑΙΑ)...ευχαριστω εκ των προτερων και please,μην κοροιδεψτε την ασχετοσυνη μου...
placid Δημοσ. 4 Ιουνίου 2001 Δημοσ. 4 Ιουνίου 2001 me to "if" pou simainei kai sta agglika an les sto programma na kanei kati .. px. me to <P>if Text2.Text="VB"<P>les an to keimeno pou yparxei sto Text2 einai "VB" na kanei kati .. ayto to kati to ekfrazeis me to then pou simainei exallou sta agglika tote .. px .. an thes na tou peis : an to text2 einai "VB" na balei to keimeno 3 na leei "VB3" tha peis<P>if Text2.Text="VB"<BR>then Text3.Text="VB3"<P>gia to for-next de thimamai ....<P><BR>oso gia to else mporeis na exeis 2 ekdoxes .. dil sa na les .. an einai mera pane na paixeis exo, eno an einai nyxta katse kai pexe computer<P>if Text2.Text="mera"<BR>then Text3.Text="pane exo na paixeis mpala"<BR>else if Text2.Text="nyxta"<BR>then Text3.Text="katse mesa na paixeis pc"<P><BR>elpizo na se boithisa .. bye !!
bandito Δημοσ. 5 Ιουνίου 2001 Δημοσ. 5 Ιουνίου 2001 For n=1 to 10<P>mpla<BR>mpla<BR>mpla <BR>mpla<BR> <BR>next n<P>AUto simainei oti to parapano kommati tha ektelestei toses fores oses na paei to n apo 1 sto 10. Kathe fora (kathe loop swstotera) to n tha exei mia diaforetiki timi pou tha antapokrinetai sto arithmo tis anakiklwsis. Px o parakatw kwdikas <P>for n=1 to 3 <BR>print n<BR>next n<P>ua exei san apotelesma na tipothei stin othoni 1 2 3<P>o parakato<P>for n=1 to 3 <BR>print 2^n<BR>next n<P>tha tiposei 2 4 8<P>Elpizo na voithisa
Γηρυόνης Δημοσ. 5 Ιουνίου 2001 Δημοσ. 5 Ιουνίου 2001 θεώρησε το παρακάτω:<P>...<BR>...<BR>100 variable1 = "hello"<BR>110 variable2 = "buy"<BR>120 IF variable1="hello" THEN PRINT("hello how are you?" ELSE PRINT("Buy, hope to see you again"<BR>...<BR>...<P> Όπως βλέπεις έχεις δύο μεταβλητές που η κάθε μία έχει διαφορετική τιμή. Χρησιμοποιώντας IF-THEN-ELSE μπορείς να κατευθύνεις τη ροή του προγράμματος ανάλογα με τις τιμές που θέλεις. Για παράδειγμα λες:<BR><B><BR> IF variable1="hello" THEN PRINT("hello how are you?" ELSE PRINT("Buy, hope to see you again" </B><P> το οποίο μεταφράζεται ως: <BR><B><BR> Αν (IF) η πρώτη μεταβλητή είναι "hello" (variable1="hello") τότε εκτύπωσε "hello, how are you" (THEN PRINT("hello how are you?") αλλιώς εκτύπωσε "Buy, hope to see you again" (ELSE PRINT("Buy, hope to see you again")<BR></B><P> Το πρώτο πράγμα είναι το IF. Δηλαδή γίνεται ένας έλεγχος για το αν μία πρόταση, μεταβλητή, ο,τιδήποτε ικανοποιεί τις συνθήκες που της έθεσες. Στο παραδειγμά μας γίνεται έλεγχος για το αν η μεταβλητή περιέχει τη λέξη "hello". Μέτά από αυτό έρχεται η λογική και λέει "τότε", δηλαδή, αν ισχύει το παραπάνω τότε κάνε κάτι, στην περίπτωσή μας αυτό μεταφράζεται σε "τότε γράψε στην οθόνη "hello how are you?"". Αν αυτό γίνει τότε το πρόγραμμα φεύγει χωρίς να εκτυπώση κάτι άλλο. Αν όχι τότε συνεχίζει και εκτυπώνει το δεύτερο σκέλος που είναι "Buy, hope to see you again".<BR> Όπωε βλέπεις σε ένα IF-THEN-ELSE statement μόνο ΕΝΑ από τα σκέλη εκτελείται και το άλλο αγνοείται. Είναι όπως και στην πραγματικότητα, "αν βρέξει τότε θα πάρω το αυτοκίνητο αλλιώς θα πάω με τα πόδια". Δεν μπορείς να πας με τα πόδια και να οδηγείς και αυτοκίνητο.<P> FOR - NEXT.<P>200 FOR i=1 TO 10<BR>210 PRINT "hello"<BR>220 NEXT i<BR>230 ...<P> Tο παραπάνω θα εκτυπώση τη λέξη "hello" 10 φορές.<P> Η γραμμή 200 έχει μία αρχική συνθήκη που λέει: δημιούργησε μία μεταβλητή i, βάλε της αρχική τιμή το 1 και ανώτατο όριο το 10.<BR> Η γραμμή 210 λέει τύπωση τη λέξη "hello"<BR> Η γραμμή 220 λέει φέρε μου το επόμενο i.<P> Το πρόγραμμα θα δημιουργήσιε μία μεταβλητή i, θα της δώση αρχική τιμή 1 και ξέρει ότι το όριό της είναι το 10 (δηλαδή δεν μπορεί να πάει πάνω από 10 ό,τι και αν γίνει). Θα πάει στην επόμενη γραμμή. Θα εκτυπώσει τη λέξη "hello". Θα πάει στην επόμενη γραμμή. Θα δει το NEXT i. ΘΑ πάει πάλι στην γραμμή που είναι η λέξη FOR. Θα ανεβάσει το i κατά 1, δηλαδή τώρα θα είναι 2. Θα πάει στην επόμενη γραμμή. Θα τυπώσει τη λέξη "hello". Θα πάει στην επόμενη γραμμή. Θα δει το NEXT i. Θα πάει πάλι εκεί που είναι το FOR. Θα αυξήσει το i, τώρα έχει την τιμή 3. .......<BR>Όταν το i είναι 11 (προσοχή όχι 10 αλλά 11)τότε θα σταματήσει. Για την ακρίβεια θα πάει μία γραμμή κάτω από το NEXT i, δηλαδή στη 230.<P> Ό,τιδήποτε είναι μεταξύ του FOR...NEXT θα πραγματοποιηθεί για όσες φορές λέει η εκάστοτε μεταβλητή. Θα μπορούσες να έχεις αρκετές γραμμές και FOR...ENXT βρόγχους μέσα σε FOR..NEXT βρόγχους. Για παράδειγμα το παραπάνω θα μπορούσε να είναι:<P>190 ...<BR>200 FOR i=1 TO 10<BR>210 PRINT "hello George"<BR>220 PRINT "How are you?"<BR>230 FOR j=1 TO 5<BR>240 PRINT "did you go out tonight?"<BR>250 NEXT j<BR>260 NEXT i<BR>270...<P>Το παραπάνω θα εκτυπώσει<P>hello George How are you?<BR>did you go out tonight?<BR>did you go out tonight?<BR>did you go out tonight?<BR>did you go out tonight?<BR>did you go out tonight?<P>10 φορές.<P> Επίσης παρατήρησε ότι όποιο FOR..ανοίγει τελευταίο τότε το αντίστοιχο ΝΕΧΤ κλείνει πρώτο. Είναι δηλαδή σαν να πηγαίνεις στον κινηματογράφο, να μπαίνεται όλοι μαζί σε μία σειρά και να σας λένε ότι δεν υπάρχουνε άλλα εισητήρια. Τότε αυτός που μπήκε τελευταίος φέυγει πρώτος κοκ.<P> Ελπίζω να βοηθήσει.<P>Υ.Γ. Έχουνε περάσει πολλά χρόνια από τότε που έκανα basic (GWBASIC) οπότε ο κώδικας μπορεί να είναι λάθος. Αυτό που μετράει είναι η σκέψη γύρω από το πως δουλεύουνε.
corduroy Δημοσ. 5 Ιουνίου 2001 Μέλος Δημοσ. 5 Ιουνίου 2001 παιδια σας ευχαριστω πολυ,καταλαβα πανω κατω τι εγινε...ελπιζω να πεισω και αυτον που θα με εξετασει οτι το καταλαβα...thanx
Προτεινόμενες αναρτήσεις
Αρχειοθετημένο
Αυτό το θέμα έχει αρχειοθετηθεί και είναι κλειστό για περαιτέρω απαντήσεις.