Hola compañeros, aqui les dejo uan pequeña informacion sobre el Lenguaje de Programación Algol.
Es de la Familia de los Lenguales imperativos iniciada a mediados de los 50, convirtiendose en un estándar de facto para presentar algoritmos hasta los 80.
Este lenguaje fue diseñado para evitar siertos problemas presentados en el lenguaje Fortran, incluyendo a Pascal.
ALGOL utiliza bloques de declaraciones entre parentesis y fue el primer lenguaje en emplear los términos BEGIN y END para delimitarlos.
Existen tres ramas oficiales de la Familia AlGOL :
- ALGOL 58: antes conocido como IAL
- ALGOL 60
- ALGOL 68
- ALGOL 60
- ALGOL 68
Sus Aplicaciones comerciales fue obstaculizada por su falta de estandar de salida/entrada en su descripción y en el poco interes en el lenguaje por parte de las grandes compañias de computacion de la epoca.
Ejemlos de Algol 60:
- procedure Absmax(a) Dimensiones:(n, m) Resultado:(y) Subíndices:(i, k);
- value n, m; array a; integer n, m, i, k; real y;
- comment De la matriz a se toma el elemento con el valor absoluto mayor y se coloca en y.
- Los subíndices del elemento se colocan en i y k;
- begin integer p, q;
- y:= 0; i:= k:= 1;
- for p:= 1 step 1 until n do
- for q:= 1 step 1 until m do
- if abs(a[p, q]) > y then
- begin y:= abs(a[p, q]);
- i:= p; k:= q
- end
- begin y:= abs(a[p, q]);
- if abs(a[p, q]) > y then
- end Absmax
Ejemplo de Algol 68:
proc absmax=(ref[]real a)real: begin int i, k; real y:=0; comment De la matriz a se toma el elemento con el valor absoluto mayor y se coloca en y. x Los subíndices del elemento se colocan en i y k; comment i:= k:= 1⌊a; for p from 1⌊a by 1 to 1⌈a do for q from 2⌊a by 1 to 2⌈a do if abs a[p, q] > y then y:= abs a[p, q]; i:= p; k:= q fi od od; y end
Asi es como se ve un programa de Algol
esta es una pagina donde pueden encontrar un tutorial para saber manejar este lenguaje de programacion TUTORIAL
Espero les haya servido esta información
SALUDOS!!
Un punto más para tu reporte 6.
ResponderEliminar