Free Pascal - Feltételes utasítás: if then, if then else

Programunk futtatását feltételekhez köthetjük. A feltételes utasítás segítségével két irányba terelhetjük a folyamatot. Ha teljesül a feltétel akkor az első irányba folytatódik a program futása ha nem akkor a második irányba. Az irányok alatt egy utasítás vagypedig egy blokk végrehajtását értem.

if then, if then else

Leírás

if condition then statement1;

if condition then statement1 else statement2;

Használt kulcsszavak: if else then

Bemenet

condition - Logikai érték Feltétel lehet akármilyen kifejezés
statement1 - Utasítások
statement2 - Utasítások

Példaprogramok

Free Pascal

Feltételes utasítás lehetséges használata:

if i > 10 then
begin
i :=10;            i := i - 1;   inc(i);
end;
if i < 10 then i := 10 else i:=1;

Free Pascal

További példaprogram részletek:

while i>0 do
   if i=10 then
     break
   else 
   begin
     dec(i)
   end;

if  x >= 12 then
   while  y >= 0 do  
      dec(y);

if y<5 then
   y := y/ 3.14;    // y = 1.234

if x > 0 then // x == true
   x:=5;

if x>$abc then
  y := x / $a;    // y = 466

if x>10 then
  y := x / $a;   // y = 1

Feltételes utasítás más programozási nyelven:

Különbségek: