Virtual G retornando valores de equações 10 vezes maiores .

[lucasn1]

Olá, Boa noite.

Alguém poderia me ajudar com esse código , sou um iniciante , os valores estão sendo multiplicados automaticamente por 10 .

Seria um erro no Virtual G ou no código ?

obrigado pela atenção

algoritmo "semnome"
// Função :
// Autor :
// Data : 17/05/2017
// Seção de Declarações
  var
    n1, n2, n3, n4: real
    quadrado1 , quadrado2 , quadrado3 , quadrado4: real
 inicio
  leia(n1)
  leia(n2)
  leia(n3)
  leia(n4)
  quadrado1 <- n1 * n1
  quadrado2 <- n2 * n2
  quadrado3 <- n3 * n3
  quadrado4 <- n4 * n4
  SE quadrado3 >= 100 então
    escreva(quadrado3)
  senao
    escreva("O quadrado de ", n1, " é igual ", quadrado1)
    escreva("O quadrado de ", n2, " é igual ", quadrado2)
    escreva("O quadrado de ", n3, " é igual ", quadrado3)
    escreva("O quadrado de ", n4, " é igual ", quadrado4)
  FIMSE
  fimalgoritmo

[Simon Viegas]

Olá @lucasn1.

 

2 horas atrás, lucasn1 disse:

os valores estão sendo multiplicados automaticamente por 10 .

Né x10 rapaz, é o "O" da frase seguinte, rs.

 

De qualquer forma, use escreval (com L no final) em vez de escreva.

 

PS: para que serve esse trecho?

2 horas atrás, lucasn1 disse:

  SE quadrado3 >= 100 então
    escreva(quadrado3)

 

 

No aguardo.

[lucasn1]

@Simon Viegas verdade kkkkk

ainda estou iniciando nesse mundo .

De qualquer modo funcionou , obrigado pela paciência !