Logica_de_Programacao_3_Edicao_Livro

192 Lógica de programação
20. senão K f-- K + I;
21. fimse;
22. J f-- J - 1; II regressão para VETB
23. fimpara;
24. fim.
EXERCÍCIO 1.4 (página 75)
1. inicio
2. li definição do tipo vetor
3. tipo VETINT = vetor [1.. 20] de inteiro;
4. li declaração de variáveis
5. VETINT: V; li vetor de entrada de dados
6. inteiro: I, J, K, li índices
7. AUX; li auxiliar para troca
8. li laço para ler os valores de entrada do vetor V
9. para Ide 1 até 20 passo 1 faça
10. leia (V[I]);
11. fimpara;
12. li ordenação do vetor
13. para Ide 1 até 19 passo 1 faça
14. K f-- I;
15. AUX f-- V[I];
16. para J de I + 1 até 20 passo 1 faça
17. se (V[J] < AUX)
18. então
19. inicio
20. K f-- J;
21. AUX f-- V[K];
22. fim;
23. fimse;
24. fimpara;
25. V [K] f-- V [ I] ;
26. V[I] f-- AUX;
27. fimpara;
28. li laço para mostrar o vetor V ordenado
29. para Ide 1 até 20 passo 1 faça
30. escreva (V[I]};
31. fimpara;
32. fim.
EXERCÍCIO 1.5 (página 76)
1. inicio
2. li definição do tipo vetor
3. tipo VETINT = vetor [1 . . 20] de inteiro;
4. li declaração de variáveis
5. VETINT: V; li vetor de entrada de dados
6. inteiro: I, J, 11 índices
7. AUX; li auxiliar para troca
( Conlinu t1)