1 2 3 4 5 6 7 8 9 10 11 12 13
# enrolado apague usenada pf 50 uselápis repita 4 [ para x = 1 até 100 [ pf 10 pd 100 - x ] ]