COBOL

 

    El deseo de desarrollar un lenguaje de programación que pudiera utilizarse en cualquier computadora, hizo que se reuniera en 1959 un grupo compuesto por fabricantes de computadoras, empresas privadas y representantes del gobierno de los EE.UU, llamado comisión CODASYL (Conference On Data Systems Languages). De estas reuniones surgió el COBOL (Commnon Business Oriented Language), es un lenguaje dirigido hacía la gestión. Esta primera versión fue llamada COBOL-60, ya que nació en 1960.

    COBOL es un lenguaje con una estructura definida. Cada parte con un objetivo concreto, facilitando así su comprensión. Su vocabulario es parecido al inglés, y está preparado para la gestión de datos en aplicaciones comerciales.


* Ordenación de una secuencia de 10 números
 Identifaction Division.
 Program-ID. Burbuja.
 Data Division.
 Working-storage section.
 01 Tabla-N.
    05 N PIC 9(4) occurs 10 Times
 01 Variables.
    05 i PIC 9(4).
    05 j PIC 9(4).
    05 aux PIC 9(4).
 01 Salida PIC Z(3)9.
 Procedure Division.
 Proceso-Principal.
  Perform varying i from 1 by 1 until i>10
   Accept N (i)
  End-Perform
  Perform Ordenar
   Varying i from 9 by -1 until i<1
   After j from 1 by 1 until j>i
  Perform varying i from 1 by 1 until i>10
   Move N (i) to Salida
   Display Salida
  End-Perform
  Stop Run.
 Ordenar.
  If N (j) > N (j+1) then
   Move N (j) to Aux
   Move N (j+1) to N (j)
   Move aux to N (j+1)
  End-If.

Ejemplo de COBOL