Correct to not read procedure between "begin" and "end"

Change way to read "procedimentos" and "atribuicao".
Not read procedure between "begin" and "end" in the
blocks procedure or main program.

Signed-off-by: Gustavo Toshi Komura <gtk10@c3sl.ufpr.br>
Execute make

Signed-off-by: Gustavo Toshi Komura <gtk10@c3sl.ufpr.br>