3 Unidad ciberne

Solo disponible en BuenasTareas
  • Páginas : 2 (482 palabras )
  • Descarga(s) : 0
  • Publicado : 13 de octubre de 2010
Leer documento completo
Vista previa del texto
tica
Procedimientos 

Concepto
Un procedimiento es un programa que realiza una tarea específica. Puede recibir cero o más valores del programa que llama y devolver cero o más valores al programaque realizó la llamada. Un procedimiento está compuesto de un grupo de sentencias a las que se asigna un nombre (identificador) y constituye una unidad de programa. La tarea asignada al procedimientose ejecuta siempre que Pascal encuentra el nombre del procedimiento.
Los procedimientos es obligatorio declararlos y deben ser declarados antes de que puedan ser referenciados en el cuerpo delprograma. En Pascal reciben el nombre de PROCEDURE.
Declaración de un procedimiento
Al igual que los identificadores, los procedimientos deben declararse dentro del cuerpo del programa. La declaración deun procedimiento NO indica a la computadora que ejecute las instrucciones dadas, sino que indica a la computadora cuáles son estas instrucciones y dónde están localizadas cuando sea necesario.
Elformato del procedimiento es el siguiente:
Procedure  nombreproc;
            Declaraciones locales
Begin
            Cuerpo del procedimiento
End;
A las variables que se encuentran dentro de unprocedimiento se les llaman Variables Locales y a las que se ubican en  el cuerpo principal, fuera de los procedimientos, se les llama Variables Globales.
En resumen, un procedimiento, al igual que unprograma, consta de tres partes:
Una cabecera del procedimiento que proporciona el nombre del mismo y, en caso de existir, una lista de parámetros formales.
Una sección de declaración que puedecontener constantes, variables e incluso otros procedimientos.
Una sección ejecutable: el cuerpo del procedimiento.
Ejemplo:
Program  Recuadro;
Var I : Integer;
Procedure  Estrellas;
(* Esteprocedimiento visualiza 15 asteriscos  *)
Begin
            For I := 1 to 15 do
                  Write (`*´)
End;
Begin
            Estrellas; (* Llamado del procedure *);
            Write...
tracking img