Advertisement
Hiitmarqes

Untitled

Sep 19th, 2019
170
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.19 KB | None | 0 0
  1. programa
  2. {
  3.  
  4. funcao inicio()
  5. {
  6.  
  7. inteiro iNumeroA, iNumeroB, iNumeroC, iTotal, lista
  8. real fNumeroA, fNumeroB, fNumeroC, fTotal
  9.  
  10. escreva("ESCOLHA UM EXERCICIO: ")
  11. leia(lista)
  12.  
  13. escolha (lista){
  14.  
  15. caso 1:
  16. escreva("Digite um numero: ")
  17. leia(iNumeroA)
  18. escreva("Digite um numero: ")
  19. leia(iNumeroB)
  20. escreva("Digite um numero: ")
  21. leia(iNumeroC)
  22. iTotal = iNumeroA + iNumeroB + iNumeroC
  23. escreva(iNumeroA, " + " ,iNumeroB, " + ", iNumeroC)
  24. escreva("\nTotal: ", iTotal)
  25. pare
  26. caso 2:
  27. escreva("Digite um numero: ")
  28. leia(iNumeroA)
  29. escreva("Digite um numero: ")
  30. leia(iNumeroB)
  31. iTotal = iNumeroA - iNumeroB
  32. escreva(iNumeroA, " - " ,iNumeroB)
  33. escreva("\nTotal: ", iTotal)
  34. pare
  35. caso 3:
  36. escreva("Digite um numero: ")
  37. leia(fNumeroA)
  38. escreva("Digite um numero: ")
  39. leia(fNumeroB)
  40. fTotal = fNumeroA + fNumeroB
  41. escreva(fNumeroA, " + " ,fNumeroB)
  42. escreva("\nTotal: ", fTotal)
  43. pare
  44. caso 4:
  45. escreva("Digite um INTEIRO: ")
  46. leia(iNumeroA)
  47. escreva("Digite um REAL: ")
  48. leia(fNumeroB)
  49. fTotal = iNumeroA + fNumeroB
  50. escreva(iNumeroA, " + " ,fNumeroB)
  51. escreva("\nTotal: ", fTotal)
  52. pare
  53. caso 5:
  54. inteiro multiplicacao
  55. escreva("Digite um numero: ")
  56. leia(iNumeroA)
  57. escreva("Digite um numero: ")
  58. leia(iNumeroB)
  59. iTotal = iNumeroA + iNumeroB
  60. multiplicacao = iTotal * 3
  61. escreva(iNumeroA, " + " ,iNumeroB, " = ", iTotal)
  62. escreva(" | ",iTotal, " * 3 ", multiplicacao)
  63. pare
  64. caso 6:
  65. escreva("Digite um numero: ")
  66. leia(iNumeroA)
  67. escreva("Digite um numero: ")
  68. leia(iNumeroB)
  69. escreva("Digite um numero: ")
  70. leia(iNumeroC)
  71. iTotal = (iNumeroA + iNumeroB + iNumeroC) / 3
  72. escreva(iNumeroA, " + " ,iNumeroB, " + ",iNumeroC, " / ", iTotal)
  73. pare
  74. caso 7:
  75. escreva("PROVA A (VALOR 2.0): ")
  76. leia(fNumeroA)
  77. escreva("PROVA B (VALOR 3.0): ")
  78. leia(fNumeroB)
  79. escreva("PROVA C (VALOR 5.0): ")
  80. leia(fNumeroC)
  81. fTotal = ((fNumeroA*2.0) + (fNumeroB*3.0) + (fNumeroC*5.0)) / 2.0 +3.0+5.0
  82. escreva("\n\nPROVA A: ",fNumeroA, "\tPROVA B: ", fNumeroB," \tPROVA C:",fNumeroC)
  83. escreva("\nMÉDIA FINAL: ", fTotal)
  84. pare
  85. caso 8:
  86. real fSalarioFinal, fSalarioDesconto
  87. escreva("SALARIO BRUTO R$: ")
  88. leia(fNumeroA)
  89. fSalarioDesconto = fNumeroA / 10
  90. fSalarioFinal = fNumeroA - fSalarioDesconto
  91. escreva("Salario com desconto da previdencia: R$" ,fSalarioFinal)
  92. pare
  93. caso 9:
  94. real t
  95. escreva("TRIANGULO BASE: ")
  96. leia(fNumeroA)
  97. escreva("TRIANGULO ALTURA: ")
  98. leia(fNumeroB)
  99. t = (fNumeroA * fNumeroB) / 2
  100. escreva("ÁREA DO TRIANGULO: ", t)
  101. pare
  102. caso 10:
  103. escreva("QUADRADO LADO: ")
  104. leia(fNumeroA)
  105. escreva("QUADRADO LADO: ")
  106. leia(fNumeroB)
  107. fTotal = fNumeroA * fNumeroB
  108. escreva("ÁREA DO QUADRADO: ", fTotal)
  109. pare
  110. caso 11:
  111. real fr
  112. escreva("GRAUS EM °C: ")
  113. leia(fNumeroA)
  114. fr = (1.8 * fNumeroA) + 32
  115. escreva("TEMPERATURA FAHRENHEIT: ", fr)
  116.  
  117.  
  118.  
  119.  
  120. }
  121.  
  122.  
  123. }
  124. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement