real aleatorio()
retorna um número real entre 0 e 1
inicio
inteiro numero , contador
escrever "chave de totoloto :"
para contador de 1 ate 6
numero <-
aleatorio ( ) * 47 + 1
escrever numero , "\t"
proximo
fim
Resultado
chave de totoloto :41 16 13 2 6 22