Função no código

• Faça um algoritmo que utilize uma função que retorne qual o maior dentre 4 números digitados pelo usuário. Em seguida, pega o retorno e soma a outro número digitado pelo usuário.

algoritmo "Funcao Maior Numero"

var

num1,num2,num3,num4,MaiorNum : inteiro

funcao fmaiorNum( n1,n2,n3,n4:inteiro):inteiro

var

resultado:inteiro

inicio

se (n1>n2>n3>n4) entao

escreva("O maior número é:" ,n1)

leia(n1)

fimse

se (n2>n1>n3>n4) entao

escreva("O maior número é:" ,n2)

leia(n2)

fimse

se (n3>n1>n2>n4) entao

escreva("O maior número é:" ,n3)

leia(n3)

senao

escreva("O maior número é:" ,n4)

leia(n4)

fimse

retorne resultado

fimfuncao

inicio

Escreva("Digite um número:")

leia(num1)

Escreva("Digite um número:")

leia(num2)

Escreva("Digite um número:")

leia(num3)

Escreva("Digite um número:")

leia(num4)

MaiorNum <- fmaiorNum( n1,n2,n3,n4)

escreva ("Resultado: " ,MaiorNum)

fimalgoritmo

Não consigo identificar o erro sendo que sou iniciante nas funções e procedimentos