H Πρόταση Ελέγχου
IF … THEN ΚΕΦΑΛΑΙΟ 10
ΕΝΤΟΛΕΣ ΕΠΙΛΟΓΗΣ ΚΑΙ ΑΠΟΦΑΣΕΩΝ Ή ΕΝΤΟΛΕΣ ΕΛΕΓΧΟΥ
ΕΝΤΟΛΗ IF
H Πρόταση Ελέγχου
IF … THEN
Συντάσσεται έτσι:
If «συνθήκη» then
Begin
«εντολές»
End;
Ο σκοπός της πρότασης ελέγχου IF…THEN είναι να ελέγχει μια έκφραση αν είναι αληθής ή ψευδής. Σε περίπτωση που είναι αληθής τότε εκτελούνται οι εντολές που ακολουθούν αλλιώτικα παραλείπονται άρα δεν εκτελούνται.
Για παράδειγμα:
Αν η μεταβλητή a είναι
μεγαλύτερη από 0 τότε τύπωσε στην
οθόνη «Θετικός» αν είναι μικρότερη από 0
τότε τύπωσε «Αρνητικός» και
αν είναι ίση με 0 τότε
τύπωσε «Έδωσες 0».
Πρόγραμμα
Program P1;
Var a : Integer;
Begin
Write('Dose arithmo:');
Readln(a);
if (a>0) then
Write('Thetikos');
if (a<0) then
Write('Arnitikos');
if (a=0) then
Write('Edoses 0');
End.
Πρόταση
Ελέγχου IF … THEN … ELSE
Συντάσσεται έτσι:
If «συνθήκη»
then
Begin
«εντολές»
End
else
Begin
«εντολές»
End;
Ο σκοπός που βάζουμε το ELSE (αλλιώς) σε μια πρόταση ελέγχου IF…THEN είναι σε περίπτωση που δεν ισχύει η συνθήκη αλλά κάτι άλλο.
Για
παράδειγμα:
Αν η μεταβλητή b
είναι μεγαλύτερη η
ίση με 100 τότε τύπωσε «ΟΚ» αλλιώς
τύπωσε «Error».
Πρόγραμμα
Program P2;
Var b : Integer;
Begin
Write('Dose arithmo:');
Readln(b);
if (b>=100) then
Write('OK')
else
Writeln('Error');
End.
Πρόταση
Ελέγχου IF … THEN … ELSE με AND
ή OR
Σε περίπτωση τώρα που έχουμε πάνω από μια συνθήκες να ελέγξουμε χρησιμοποιούμε τους λογικούς τελεστές AND και OR.
Το AND το χρησιμοποιούμε άμα ισχύουν ΟΛΕΣ οι προτάσεις ενώ το OR χρησιμοποιείτε αν ισχύει ΜΙΑ από τις προτάσεις.
Για παράδειγμα :
Αν η μεταβλητή c είναι μεγαλύτερη από 0 KAI μικρότερη
από100 τότε τύπωσε «Είσαι μέσα στα όρια» αλλιώς
τύπωσε «Είσαι εκτός ορίων».
Πρόγραμμα
Program P3;
Var c : Integer;
Begin
Write('Dose arithmo:');
Readln(c);
if (c>=0) and (c<=100) then
Write('Eise mesa sta oria')
else
Write('Eise ektos oriwn');
End.
ΛΟΓΙΚΟ ΔΙΑΓΡΑΜΜΑ
ΠΑΡΑΔΕΙΓΜΑΤΑ ΕΝΤΟΛΩΝ ΕΛΕΓΧΟΥ IF
