Programação Estruturada
Tese: Programação Estruturada. Pesquise 862.000+ trabalhos acadêmicosPor: vicente89 • 16/9/2013 • Tese • 488 Palavras (2 Páginas) • 362 Visualizações
UNIVERSIDADE ANHANGUERA
CAMPUS MORUMBI
2º SEMESTRE 2013
SISTEMAS DE INFORMAÇÃO
ATPS
Programação Estruturada
PROFESSOR: César Kiel
NOME : Gabriel Vicente Ferreira RA:6444288445
NOME: Marcos A.S da Silva RA:6840464954
Relatório 01: Planejamento Inicial
algoritmo "Calculadora"
// Função : Exercício de Comando de Repetição.
// Criar um algoritmo de uma calculadora que realiza as operações de soma,
// subtração e multiplicação com algumas restrições.
// A calculadora deve ler 2 valores e oferecer um menu com
// as seguintes operações: soma, subtração, multiplicação e sair.
// 1. A calculadora deve somar usando apenas as
// operações de incremento e decremento.
// 2. Deve multiplicar usando soma.
// 3. Deve subtrair utilizando incremento e decremento.
// Deve ser feito em Portugol.
// Autor : Edinardo Passos
// Data : 13/11/2008
// Seção de Declarações:
var
n1, n2, opcao, resultado: inteiro
procedimento EsperaTecla
var
espera: caractere
inicio
escreval (" -------------------------------")
escreval (" PRESSIONE QUALQUER TECLA ")
escreval (" -------------------------------")
escreva (" ")
leia (espera)
fimprocedimento
funcao Soma (x,y: inteiro): inteiro
var
i, total: inteiro
inicio
total <- 0
para i de 1 ate x faca
total <- total + 1 // soma usando incremento
fimpara
para i de 1 ate y faca
total <- total + 1 // soma usando incremento
fimpara
retorne total
fimfuncao
funcao Multiplicacao (x,y: inteiro): inteiro
var
i, total: inteiro
inicio
total <- 0
para i de 1 ate x faca
total <- total + y // multiplica usando soma
fimpara
retorne total
fimfuncao
funcao Subtracao (x,y: inteiro): inteiro
var
i, total: inteiro
inicio
total <- 0
// subtrai usando incremento e decremento:
para i de 1 ate x faca
total <- total + 1 // usando incremento para carregar o total
fimpara
para i de 1 ate y faca
total <- total - 1 // subtrai usando decremento
fimpara
retorne total
fimfuncao
inicio
// Seção de Comandos:
repita
limpatela
escreval (" -------------------------------")
escreval (" CALCULADORA")
escreval (" -------------------------------")
escreval
escreva (" DIGITE O PRIMEIRO VALOR...: ")
...