Algoritmo em Portugol que some o quadrado de três números usando função ou procedimento

Atenção: Precisando de assessoria nos seus PROJETO entre em contato com a SGP

E-mail: ajudastrabalhosprogramacao@gmail.com

Whats: (15) 99704-0447

Elaborar um programa que efetue a leitura de três valores (A, B e C) e apresente como resultado
final o quadrado da soma dos três valores lidos.

algoritmo "somaQuadrado"
funcao QUADRADO(A,B,C:inteiro):inteiro
var
   soma:inteiro
inicio
      soma<-(A*A)+(B*B)+(C*C)
      retorne soma
fimfuncao
var
   n1,n2,n3:inteiro
inicio
      escreva("Informe três valores: ")
      leia(n1,n2,n3)
      escreva("O quadrados dos números eh: ",QUADRADO(n1,n2,n3))
fimalgoritmo

Usando procedimento

algoritmo "somaQuadrado"
procedimento QUADRADO(A,B,C:inteiro)
var
   soma:inteiro
inicio
      soma<-(A*A)+(B*B)+(C*C)
      escreva("O quadrados dos números eh: ",soma)
fimprocedimento
var
   n1,n2,n3:inteiro
inicio
      escreva("Informe três valores: ")
      leia(n1,n2,n3)
      QUADRADO(n1,n2,n3)
fimalgoritmo

Atenção: Precisando de ajuda entre em contato com a SGP e solicite uma assessoria com a melhor equipe do mercado no desenvolvimento de trabalhos acadêmicos

E-mail: ajudastrabalhosprogramacao@gmail.com

Facebook: fb.me/ajudaemTrabalhosdeprogramacao