Algoritmos y Programación en Pascal

8.7. Desarrollo correcto de subprogramas 185
{ prodAcum = n!}
Fac:= prodAcum
{F ac = n!}
end; {Fac}
❡❡
En el caso de que en el código de nuestro subprograma aparezcan llamadas
a otros subprogramas, la verificación dependerá, naturalmente, de la
corrección de éstos. Nuestra tarea en este caso consistirá en comprobar que
esas llamadas son correctas de la forma que se detallará a continuación. En
el caso particular de que las llamadas sean al mismo subprograma (subprogramas
recursivos) habrá que recurrir a técnicas de verificación específicas
que serán explicadas en el capítulo 10.
Además, para cada subprograma especificaremos su interfaz de una forma
semi-formal. Para ello explicitaremos al principio de cada subprograma una precondición
que describa lo que precisa el subprograma para una ejecución correcta
y una postcondición que indique los efectos que producirá. Así, en nuestro
ejemplo: 8
function Fac(n: integer): integer;
{PreC.: 0 ≤ n ≤ 7 y n ≤ MaxInt}
{Devuelve n!}
var
i, prodAcum: integer;
begin
prodAcum:= 1;
{Inv.: i ≤ n y prodAcum = i! }
for i:= 2 to n do
prodAcum:= prodAcum * i;
{prodAcum = n!}
Fac:= prodAcum
{F ac = n!}
end; {Fac}
Más precisamente consideraremos que la precondición de un subprograma es
una descripción informal de los requisitos que se deben cumplir para su correcto
funcionamiento. La postcondición es una descripción más o menos formal del
resultado o del comportamiento del subprograma.
La línea que proponemos es, pues, incluir las precondiciones y postcondiciones
como parte de la documentación del subprograma. Visto desde un punto más
formal, consideraremos que la especificación del subprograma está formada por
8 n debe ser menor que 8 para que n! ≤ MaxInt, ya que 8! = 40320 > MaxInt.