Maior de 2 números - v2

 Algoritmo "maior de 2 números - versão 2"

Var

Inicio

funcao maior(a,b:inteiro):inteiro

var aux: inteiro

inicio

   se (a>b) entao

      retorne a

   senao

      retorne b

   fimse

fimfuncao

funcao pedirNumero():inteiro

var n:inteiro

inicio

   escreva("Escreva um número: ")

   leia(n)

   retorne n

fimfuncao

funcao numeros():inteiro

inicio

   retorne maior(pedirNumero(),pedirNumero())

fimfuncao

escreva(numeros())

Fimalgoritmo