arquivo ent
arquivo sai
int i

ent <- abre("arq1.txt")
sai <- abre("arq2.txt")

leia ent: n

vetor(real, n) v

para i em (0..n-1):
    leia ent: v[i]

para i em (0..n-1):
    mostre sai: i, " ", v[i]