Usos funcao aleatorio

[Aristidescosta]

Corrigido o erro anterior no leia

Agora códigos como:

algoritmo "aleatorio"
var
   mes1, mes2 :real

inicio
   escreval("Digite o mes do ano")

   aleatorio 1, 12
       leia(mes1)
   aleatorio off
       leia(mes2)

   escreval("")
   escreval("Mes 1:", mes1)
   escreval("Mes 2:", mes2)
fimAlgoritmo

ou

algoritmo "aleatorio"
var
   nome :caracter

inicio
   escreval("Digite o seu nome: ")

   aleatorio on
       leia(nome)
   escreval("")
   escreval("Olá ", nome)
fimAlgoritmo

Já funcionam...