Pneus loop

Boa noite, na parte de condições "se". para ax de 1 ate 5 passo 1 faca leia (pneu)
se (pneu=1) entao
escreval ("o pneu está bom")
bom <- bom+1
escreval ("o n de pneus bons foram de:",bom)
senao
se (pneu=2) entao
escreval ("a pneu é ruim")
senao
fimse
fimse
fimpara Quando digita a opção "2" aparece que o pneu é "bom", mas teria que sair "ruim", aguardo!