Metodos Numericos Estudo Dirigido 1º Bimestre

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