I am trying to show 1 to 10 in visualg, but it is giving error in 1 line where theoretically everything is right

Algoritmo "SUPER CONTADOR"
//  

Var
   N1,cont : Inteiro

Inicio

  repita

    escreval ("===================") 

    escreval("|     MENU        |")
    escreval ("===================")
    escreval ("| [1] De 1 até 10 |")
    escreval ("| [2] De 10 até 1 |")
    escreval ("| [3] Sair        |")
    escreval ("===================")
    leia (N1)
    cont <- 1
    enquanto(cont < 10) faca <- o visualg está endentificando o erro nessa linha
      escreva (cont)
     cont <- cont + 1
    fimenquanto
  ate (N1 = 3)
Fimalgoritmo