What is the error in the program?

0
Algoritmo "semnome"

Var
n1, n2,maior,menor, diferenca: real


Inicio
escreval("diferença do maior pelo menor")
escreva ("numero1 = ")
leia (n1)
escreva ("numero2 = ")
leia (n2)
se (n1>n2) entao
n1 <- maior
n2 <- menor
senao
n1 <- menor
n2 <- maior

fimse
diferenca <- (maior-menor)
escreva (diferenca)

Fimalgoritmo

any result set from zero as difference

    
asked by anonymous 27.04.2018 / 20:59

1 answer

1

As the bfavaretto commented the error happens by this inversion.

  

In your conditional structure you set the variable n1 and n2 com   the variable maior and menor being smaller and larger were declared   more had no assigned values. .

     

Try this:

se (n1>n2) entao
   maior <- n1
   menor <- n2
senao
   maior <- n2
   menor <- n1
fimse

Doing passo a passo in Visualg to identify the error:

Wheretheerrorhappens:

FollowingyourideaIcreatedascheme:

  

Code:

algoritmo"semnome"
// Função :
// Autor :
// Data : 28/04/2018
// Seção de Declarações 
var
n1, n2, diferenca: real

inicio
// Seção de Comandos
escreval("=============================")
escreval("diferença do maior pelo menor")
escreval("=============================")
escreval("")
escreva("Informe o 1º número: ")
leia(n1)
escreva("Informe o 2º número: ")
leia(n2)

limpatela

se (n1 > n2) entao
   diferenca <- (n1 - n2)
   escreval("============================================================")
   escreval("o número ", n1, " é maior que o número ", n2, " e a diferença é ", diferenca)
   escreval("============================================================")
senao
   se (n1 < n2) entao
      diferenca <- (n2 - n1)
      escreval("============================================================")
      escreval("o número ", n2, " é maior que o número ", n1, " e a diferença é ", diferenca)
      escreval("============================================================")
   senao
      escreval("Os números são iguas!")
   fimse
fimse
fimalgoritmo

See it working:

    
28.04.2018 / 08:02