Logica_de_Programacao_3_Edicao_Livro

Capítulo 3 Estruturas de controle 1 5 5
• o laço é executado pelo n1e11os un1a vez, e se este for o caso o usuário teve bastante
sorte e acertou o nún1ero na p1i n1eira tentativa (TENT será ig1,1al a un1);
e. Construa um algoritmo que permita fazer um levantamento do estoque de vinhos de
uma adega, tendo como dados de entrada tipos de vinho, sendo: 'T' para tinto, 'B'
para branco e 'R' para rosê . Especifique a porcentagem de cada tipo sobre o total
geral de vinhos; a quantidade de vinhos é desconhecida, utilize como finalizador
'F' de fim.
ALGORITMO 3.14 Repita com escolha
1. inici o
2. caracter: TV ; li tipo de vinho
3. i nteiro: CONV, li contador de vinho
4. CT, li contador de tinto
5. CB , li contador de branco
6. CR; li contador de rosê
7. real : PT, PB, PR; li porcentagem de tinto, branco e rosê
8. li inicialização dos diversos contadores
9. CONV f- O;
10. CT f- O;
11. CB f- O;
12. CR f- O;
13. repi t a
14. lei a (TV);
15. escolha TV
16.
17.
18.
19.
20. CONV f- CONV +
caso ..T": CT f- CT + 1. ,
caso 11 8 11: CB f- CB + 1. ,
caso "R": CR f- CR + 1· ,
fimescol ha;
1;
21. at é TV= ''F'';
22. CONV f- CONV - 1; 11 descontar o final izador "F"
23. se (CONV > O)
24. então
25. inici o
26.
27.
28.
29.
30.
31.
32. fim ;
33. senao
PT f- (AT*lOO)I CONV;
PB f- (AB*lOO)ICONV;
PR f- (AR*lOO)I CONV;
escreva (''Porcentagem de Tintos='', PT);
escreva ("Porcentagem de Brancos=", PB);
escreva (''Porcentagem de Rosês = '' , PR);
34. escreva (''Nenhum tipo de vinho foi fornecido!'')
35. fimse;
36. fim.