///
O trecho de algoritmo abaixo emprega a função predefinida MOD, que retorna o valor do resto da divisão entre dois números.
algoritmo"F"
var
___NR : inteiro
funcao FC (X, Y:inteiro) :inteiro
inicio
__se Y = 0entao
_____retorne X
__senao
______retorne FC (Y, X MOD Y)
__fimse
fimfuncao
inicio
__escreva (FC(13, 7))
fimalgoritmo
A chamada da função para F(13,9) irá retornar o seguinte valor: