Baixe o app para aproveitar ainda mais
Prévia do material em texto
UNIVERSIDADE TUIUTI DO PARANÁ LUIZ EDUARDO FERNANDES DA SILVA MATHEUS DE OLIVEIRA SALVADOR PABLO DIOVANY PINTO DA SILVA RAFAEL ALVES DE AZEVEDO ESTUDO DIGIDO – 1° BIMESTRE CURITIBA 2017 LUIZ EDUARDO FERNANDES DA SILVA MATHEUS DE OLIVEIRA SALVADOR PABLO DIOVANY PINTO DA SILVA RAFAEL ALVES DE AZEVEDO ESTUDO DIGIDO – 1° BIMESTRE Trabalho apresentado no curso de Engenharia Elétrica da Universidade Tuiuti do Paraná, como requisito avaliativo do 1º bimestre da disciplina de Métodos Numéricos Computacionais. Professor: Sergio Marques. CURITIBA 2017 ALGORITIMOS - SOFTWARE Algoritmo "Calculadora Basica" // Disciplina : Métodos Numericos Computacionais // Professor : Sergio Marques // Descrição : Criar um software de uma calculadora com os comandos básicos // Autor 1 : Luiz Eduardo Fernandes da Silva // Autor 2 : Pablo Diovany Pinto da Silva // Autor 3 : Rafael Alves de Azevedo // Autor 4 : Matheus de Oliveira Salvador // Data atual : 06/09/2017 Var // Seção de Declarações das variáveis operacao : inteiro numero01 : real numero02 : real resultado : real // Procedimento Adição funcao adicao ( numero01, numero02: real) :real inicio retorne (numero01 + numero02) fimfuncao // Procedimento Subtração funcao subtracao ( numero01, numero02: real):real inicio retorne (numero01 - numero02) fimfuncao // Procedimento Multiplicão funcao multiplicacao ( numero01, numero02: real) :real inicio retorne (numero01 * numero02) fimfuncao // Procedimento Divisão funcao divisao ( numero01, numero02: real) :real inicio retorne (numero01 / numero02) fimfuncao // Procedimento Exponenciação funcao exponenciacao( numero01, numero02: real) :real inicio retorne (numero01 ^ numero02) fimfuncao // Procedimento raiz funcao raiz ( numero01: real) :real inicio retorne (numero01 ^ 0.5 ) fimfuncao Inicio // Seção de Comandos repita escreval("-------------------------------------------") escreval(" Escolha a Operação ") escreval("-------------------------------------------") escreval(" 1- Somar ") escreval(" 2- Subtrair ") escreval(" 3- Multiplicar ") escreval(" 4- Dividir ") escreval(" 5- Potenciação ") escreval(" 6- Raiz Quadrada ") escreval(" 0- Sair ") escreval("-------------------------------------------") escreval("Informe a Operação") leia(operacao) escolha operacao caso 0 escreval("-------------------------------------------") escreval(" F I M D E P R O G R A M A ") escreval("-------------------------------------------") caso 1 escreval("-------------------------------------------") escreval(" S O M A R ") escreval("-------------------------------------------") escreval("Informe um valor") leia(numero01) escreval("Informe outro valor") leia(numero02) resultado := adicao (numero01, numero02) escreval("A soma é: ", resultado) caso 2 escreval("-------------------------------------------") escreval(" S U B T R A I R ") escreval("-------------------------------------------") escreval("Informe um valor") leia(numero01) escreval("Informe outro valor") leia(numero02) resultado := subtracao (numero01, numero02) escreval("A subtração é: ", resultado) caso 3 escreval("-------------------------------------------") escreval(" M U L T I P L I C A R ") escreval("-------------------------------------------") escreval("Informe um valor") leia(numero01) escreval("Informe outro valor") leia(numero02) resultado := multiplicacao (numero01, numero02) escreval("A multiplicação é: ", resultado) caso 4 escreval("-------------------------------------------") escreval(" D I V I D I R ") escreval("-------------------------------------------") escreval("Informe um valor") leia(numero01) escreval("Informe outro valor") leia(numero02) resultado := divisao (numero01, numero02) escreval("A multiplicacao é: ", resultado) caso 5 escreval("-------------------------------------------") escreval(" E X P O N E N C I A L ") escreval("-------------------------------------------") escreval("Informe um valor") leia(numero01) escreval("Informe o expoente") leia(numero02) resultado := exponenciacao (numero01, numero02) escreval("A exponenciacao é: ", resultado) caso 6 escreval("-------------------------------------------") escreval(" R A I Z Q U A D R A D A ") escreval("-------------------------------------------") escreval("Informe um valor") leia(numero01) enquanto numero01 < 0 faca repita escreval("-------------------------------------------") escreval(" N Ã O É P O S S I V É L ") escreval(" R E A L I Z A R O C A L C U L O ") escreval(" C O M N U M E R O S N E G A T I V O S ") escreval("-------------------------------------------") escreval("Informe Outro Valor") leia(numero01) ate (numero01 >= 0) entao resultado := raiz (numero01) escreval("A raiz quadrada é: ", resultado) fimenquanto outrocaso escreval("-------------------------------------------") escreval(" O P Ç Ã O I N V A L I D A ") escreval("-------------------------------------------") escreval(" Por Favor, Abra o Programa Novamente ") fimescolha fimalgoritmo PROCEDIMENTOS OPÇÃO 0 – SAIR OPÇÃO 1 – SOMAR OPÇÃO 2 – SUBTRAIR OPÇÃO 3 – MULTIPLICAR OPÇÃO 4 – DIVIDIR OPÇÃO 5 – POTENCIAÇÃO OPÇÃO 6 – RAIZ QUADRADA OPÇÃO INVALIDA
Compartilhar