Paradigmas

1) Construa um algoritmo que solicite ao usuário o valor, em reais, de um notebook e calcule as seguintes operações:

a) Valor da parcela na venda à vista com 10% de desconto.

b) Valores das parcelas na venda a prazo em 3 vezes (1 parcela de entrada mais 2 parcelas sem juros).

c) Valores das parcelas na venda a prazo em 6 vezes (6x com ou sem entrada) com juros de 10% sobre o valor total do produto.

d) Valores das parcelas a prazo acima de 6 vezes (até 12 vezes com ou sem entrada) com juros de 30% sobre o valor total do produto.

Algoritimo Notebook;

Declare

valornotebook, valorparcela, valorfinal : real;

numeroparcelas : inteiro;

Inicio

escreva(“Informe o valor do Notebook:”); leia(valornotebook);

escreva(“Número de parcelas (1-12):”); leia(numeroparcelas);

se (numeroparcelas = 1)

valorfinal := valornotebook * 0.9;

valorparcela := valorfinal;

fim-se;

se (numeroparcelas = 3)

valorfinal := valornotebook;

valorparcela := valorfinal / 3;

fim-se;

se (numeroparcelas = 6);

valorfinal := valornotebook * 1.10;

valorparcela := valorfinal / 6;

fim-se;

se (numeroparcelas >6 e numeroparcelas <=12);

valorfinal := valornotebook * 1.30;

valorparcela := valorfinal / numeroparcelas;

fim-se;

escreva(“Valor final do Notebook:” : valorfinal);

escreva(“Número de parcelas:” : numeroparcelas)

escreva(“Valor das parcelas:” : valorparcela);

Fim.

2) Desenvolva um algoritmo, usando alguma estrutura de repetição que calcula a somatória dos dez primeiros termos da série seguinte: Somatório = 1/2 + 2/3 + 4/4 + 8/5 + ...

Algoritimo Soma;

Declare

x, soma, dividendo, divisor : inteiro;

Inicio

escreva(“A soma da série “); soma := 0;

para x := 1 até 10 faça Inicio

se (x=1) então

dividendo := 1

senão

dividendo := dividendo * 2;

divisor := x + 1;

soma