How can I compare values in this calculator algorithm

Question

The objective of this algorithm is to be a small calculation game, where it compares the result of the operation informed by the user with the correct value of the same and so say whether or not the user has hit the result of the operation. I’m testing with the summation operation for now.

algoritmo "Jogo Calculadora"
// Data : 16/1/2017
// Seção de Declarações
var
num1, num2, opcao, resultado, cont, b: inteiro
inicio
// Seção de Comandos
cont <- 0
escreva ("Digite o 1º número (de 1 a 10): ")
leia (num1)
escreva ("Qual operação deseja? ")
escreval ("[1] - Somar")
escreval ("[2] - Subtrair")
escreval ("[3] - Multiplicar")
escreval ("[4] - Dividir")
escreval ("[5] - Sair")
leia (opcao)
escreval ("Digite agora o 2º número (de 1 a 10): ")
leia (num2)
escreva ("Qual o resultado? ")
leia (resultado)

escolha opcao
caso 1
   se (num1 > 0) entao
      se (num1 <= 10) entao
         enquanto (cont <= 10 ) faca
            b <- num1 + cont
            escreval (b)
            cont <- cont + 1
            se (cont == resultado) entao
               escreval ("Parabéns você acertou!")
            seNao
               escreval ("Você errou!")
            fimEnquanto

         seNao
            escreval ("Valor inválido!")
         fimSe
      seNao
         escreval ("Valor inválido!")
      fimSe
   caso 2
   caso 3
   caso 4
   caso 5
   fimEscolha
fimalgoritmo

Answer 1

escolha opcao
caso 1
   se (num1 > 0) e (num2>0) entao
      se (num1 <= 10) e (num2 <= 10) entao
         cont <- num1 + num2
         se (cont == resultado) entao
         escreval ("Parabéns você acertou!")
         seNao
         escreval ("Você errou!")
         fimSe
      seNao
       escreval ("Valor inválido!")
      fimSe
    seNao
      escreval ("Valor inválido!")
    fimSe 
fim caso 1