Referencia: Pascal - end

end

(palabra clave)
Lenguaje: Pascal

Final de un bloque de órdenes

Detalles:
Indica el final del conjunto begin-end, que permite que todo un bloque de órdenes sea tratado como una única orden.

También puede indicar el final de un "case", un "record", un "object" o un bloque "asm".


Ejemplo:
(* Orden compuesta dentro de un "for" *)
for x := 1 to 10 do  
begin
  Write(x*2); 
  Write(' '); 
end;
 
(* Orden compuesta dentro de un "if" *)
if primero < segundo then
begin
  temp := primero;
  primero := segundo;
  segundo := temp;
end;

(* "end" en un "case" *)
 case Ch of
   'A'..'Z', 'a'..'z':  WriteLn('Letra');
   '0'..'9':            WriteLn('Dígito');
   '+', '-', '*', '/':  WriteLn('Operador');
 else
   WriteLn('Carácter especial');
 end;

(* "end" en un "record" *)
type
  Fecha   = record
    D, M, A: Integer;
  end;

(* "end" en un "object" *)
type
  Punto = object
    X, Y: Integer;
    procedure Init(PX, PY: Integer);
    function GetX: Integer;
    function GetY: Integer;
  end;

(* "end" con "asm" *)
asm
  mov ax,1
  mov cx, 100
end;

Órdenes relacionadas:   begin  


  Volver al índice de la referencia o al apartado de Pascal

 

En los foros