Free Pascal - Összetett utasítás - Blokk: begin end

Összetett utasítás más néven blok. Több utasítás összekötésére szolgál, végeredményben egy utasításba sűrít egy bloknyi utasítást.

begin end

begin end;

begin statement end;

begin statement statement end;

Használt kulcsszavak: end begin

Összetett utasítás - Blokk lehetséges használata:

y:=10;
if x>1 then
begin
  x:=1;
  y:=y-1;
end;
while y>1 do
begin
  inc(x);
  dec(y);
end;

További példaprogram részletek:

while i<20 do
begin
 i:= i+2;
 if i=16 then
 begin
    continue
 end;
 inc(x); 
end;

if i=10 then
     break
   else 
   begin
     dec(i)
   end

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

Összetett utasítás - Blokk más programozási nyelven:

Különbségek: