17. Faça um algoritmo que leia o dia do mês ( valor de 1 a 31 ), e o dia da semana correspondente ( 1 a 7 ). O algoritmo deve calcular e escrever o dia da semana ( 1 a 7 ) correspondente ao primeiro dia do mês.
Resposta:
1. algoritmo "Cálculo do primeiro dia de mês."
2. var
3. semana:literal
4. dm,ds:inteiro
5. inicio
6. escreval("Saiba qual é o primeiro dia do mês.")
7. escreva(" Digite o dia do mês de 1 a 31 -> ")
8. leia(dm)
9. escreva(" Digite o dia da semana de 1 a 7 -> ")
10. leia(ds)
11. se (dm>31) e (dm<1) e (ds>7) e (ds<1) entao
12. escreva("Número inválido")
13. fimalgoritmo
14. senao
15. se dm>1 entao
16. dm <- dm-1
17. ds <- (ds-2)
18. se (ds=0) entao
19. ds <- (7)
20. fimse
21. fimse
22. fimse
23. se ds=1 entao
24. semana <- "é um Domingo."
25. senao
26. se ds=2 entao
27. semana <- "é uma Segunda-feira."
28. senao
29. se ds=3 entao
30. semana <- "é uma Terça-feira."
31. senao
32. se ds=4 entao
33. semana <- "é uma Quarta-feira."
34. senao
35. se ds=5 entao
36. semana <- "é uma Quinta-feira."
37. senao
38. se ds=6 entao
39. semana <- "é uma Sexta-feira."
40. senao
41. se ds=7 entao
42. semana <- "é Sabado."
43. fimse
45. fimse
46. fimse
47. fimse
48. fimse
49. fimse
50. fimse
51. escreval(" O dia da semana ",semana)
52. fimalgoritmo
Nenhum comentário:
Postar um comentário