Funções algoritmicas que não têm resultado, ou têm resultado de tipo estruturado (tabelas ou registos), são implementadas por procedimentos.
Quando se trata de um resultado de tipo estruturado, utiliza-se um parâmetro do tipo VAR
para devolver o resultado.
O seguinte algoritmo não devolve um resultado:
_media: REALpelo que se escreve em Pascal na forma de um procedimento:
esc_media(valor)
esc(``A media e':'', valor)
esc_media(valor: REAL);Supondo que não pretendermos utilizar uma função, o algoritmo 3.6 é implementado pelo seguinte procedimento:
BEGIN
WRITELN('A media e'':', valor)
END;
media(valor1, valor2, valor3: REAL; VAR med: REAL);
BEGIN
med := (valor1+valor2+valor3)/3.0
END;
