Algoritmos de programação e lógica

PORTFÓLIO 2

Lógica de Programação e Algoritmos

...............................................................................................................................

Guarulhos

2013

PORTFÓLIO 2

Lógica de Programação e Algoritmos

Trabalho apresentado ao Curso Sistema da informação da Faculdade ENIAC para a disciplina de Lógica de Programação e Algoritmos

Prof. Cao Jin Kan

Guarulhos

2013

Respostas

EXÉRCICO 1._________________________

algoritmo "Quantidade de meses"

var

salariocarlos, salariojoao: real//Sálários dos dois funcionários

rendacarlos, rendajoao: real //renda mensal com juros

i:real//contador de porcentagem p/ fun1

i2: real//contador de porcentagem p/ fun2

j: real// juros

j2: real// juros 2

meses:real//quantidade de meses

mes : real // contagem de meses: "1º,2º,3ºmes....."

carlos, joao: caractere// nome dos dois funcionários

r1, r2: real//salário final(com o juro já imbutido)

inicio

// Seção de Comandos

escreval("A seguir temos a demonstração de dois valores aplicados em diferentes")

escreval(" taxas de juros. o objetivo é saber com quantos meses o menor salário ")

escreval("irá ultrapassar o maior salário, já que o juro do menor salário será mais alto ")

escreval("que o juros do maior salário:")

escreval("")

escreval("Nome do funcionário de maior salário")

leia (carlos)

escreval("Digite o salário de " ,carlos)

leia(salariocarlos)

escreval("o juros que correrá o Dinheiro de ",carlos)

leia (j)

ESCREVAL ("Nome do funcionário de menor salário")

leia(joao)

repita

escreval ("Digite o salário de ",joao)

leia(salariojoao)

se salariojoao >= salariocarlos entao

escreval("Dado incorreto. O valor informado é maior que o salário de ", carlos)

fimse

ate salariojoao < salariocarlos

fimrepita

repita

escreval ("o juros que correrá o Dinheiro de ",joao)

leia(j2)

se j2 <= j entao

escreval("O juros do menor salário deve ser maior que o juro do maior salário" )

fimse

ate j2 > j

fimrepita

i <- j/100

rendacarlos <- salariocarlos * i

i2 <- j2/100

rendajoao <- salariojoao * i2

r1 <- rendacarlos

r2 <- rendajoao

mes <- 1

faca r2/r1 ate 1

MES <- MES + 1

escreva(joao," ",MES,"º mês ",r2)

escreval (" ",carlos," ",mes,"º mês ",r1 )

meses <- (r2 - salariojoao)/rendajoao

escreval(meses," mes(es) para o salário do Sr.",joao," ultrapassar o