Logica_de_Programacao_3_Edicao_Livro

150 1 Lógico de programação
ALGORITMO 6.12 Módulo Par
1. módulo Par (inteiro: N)
2. se (N mod 2) = O
3. então retorne (V);
4. senão retorne (F);
5. fimse;
6. fi11111ódulo;
Devemos ter cuidado ao utilizar 1nódulos co1n contexto de resultado, pois quando au·ibuhnos
o reto1110 do módulo a u1na variável recebemos um valor do 111esmo tipo ao da
expressão utilizada no comando retorne, sendo necessá1ia a verificação da compatibilidade
de tipos. O resultado do módulo Par só poderá ser aUibuído a uma va1iável d e tipo priinitivo
lógico.
O algoriuno do cartão de ponto, uülizando os conceitos de contexto de 1nódulos, fica:
ALGORITMO 6.13 Cartão de Ponto - versão 4
~
~
~
~
~
~
1. inicio
2. tipo dia - registro
3. inteiro: em, sm, et, st;
4. fimregistro;
5. tipo totDia = registro
6. inteiro: atraso, horas;
7. fimregistro ;
8. tipo Vl = vetor [1. . 31] de dia;
9. tipo V2 = vetor [1 .• 31] de totDia;
10. Vl: cartão;
11. V2: totalDia;
12 . inteiro: cont , i , t oth, t otatr;
13.
14. módulo Entrada
15. inteiro: dia, a, b, c, d;
16. cont O;
17. leia (dia);
18. enquanto (dia> O) e (dia< 32) faça
19. leia (a, b, e, d);
20 . cartão[dia] .em a;
21. cartão[dia] . sm b;
22. cartão[dia] .et e;
23. cartão[dia].st d;
24. cont cont + 1;
25. leia (dia);
26. fimenquanto;
27. fimmódulo;
28.
29. módulo Cálculo
30.
31. módulo Minuto (inteiro: H)
(Cm1,ti11ua,)