Algoritmos y Programación en Pascal

198 Capítulo 9. Programación con subprogramas
var
r: integer;
begin
while d 0 do begin
r:= n mod d;
n:= d;
d:= r
end; {while}
MCD:= n
end; {MCD}
Las técnicas de programación estructurada descomponen las acciones complejas
mediante instrucciones estructuradas que controlan acciones más sencillas
o realizan llamadas a subprogramas. En este caso, los subprogramas realizan
acciones abstractas definidas mediante sus especificaciones.
Recordemos, por ejemplo, el esquema de un programa controlado por menú:
repetir
Mostrar menú
Leer opcion
en caso de que opcion sea
0: Salir
1: Entrada de datos por teclado
2: Lectura de datos de archivo
3: Listado de datos
. . .
n: Ejecutar la opción n-ésima
hasta opcion = 0
La instrucción estructurada Repetir. . . hasta está controlando la ejecución de
las acciones Mostrar menú y Leer opción, y la instrucción de seleccion múltiple
En caso de que. . . sea controla las acciones Entrada de datos por teclado, Lectura
de datos de archivo, etc. correspondientes a las sucesivas opciones del programa
cuyo desarrollo está todavía por hacer. Estas acciones posiblemente pertenecerán
a subprogramas con uno o más niveles inferiores cuando sean refinadas.
En consecuencia, el diseño por refinamientos sucesivos genera una estructura
jerárquica de tipo arborescente en la que las llamadas a los subprogramas se controlan
mediante instrucciones estructuradas (secuencia, selección y repetición)
y, a su vez, los distintos subprogramas se desarrollan internamente mediante
instrucciones estructuradas.