nada

FATEC-PG/PROGRAMAÇÃO MICROINFORMÁTICA/NOTURNO
LISTA DE EXERCÍCIOS 1

Escrever sub-rotinas diferentes em VBA para:
1. Converter temperaturas em Celsius para Fahrenheit;
2. Converter ângulos em graus para radianos;
3. Converter hectares para alqueires;
4. Converter tempo em segundos para tempo em hora, minuto e segundo. Exemplo, 3674 segundos equivale a 1 hora, 1 minuto e 14 segundos;
5. Calcular a área e o perímetro de retângulos de quaisquer dimensões;
6. Calcular a área de triângulos de quaisquer dimensões;
7. Calcular a área de trapézio de quaisquer dimensões;
8. Calcular o volume de paralelepípedos de quaisquer dimensões;
9. Calcular o volume de esferas de quaisquer dimensões;
10. Calcular a hipotenusa de um triângulo retângulo a partir de seus catetos;
11. Calcular o lucro de uma aplicação financeira de C reais a uma taxa de juros J;
12. Calcular a corrente em um circuito elétrico composto por um gerador e um resistor. Considerar U a tensão do gerador e R o valor da resistência do resistor;
13. Calcular o bônus dos vendedores de uma loja com base na lógica:
a. Bônus de R$1.000, se quantidade vendida for maior ou igual a 5000 unidades e o valor total das vendas for maior ou igual a R$700.000;
b. Bônus de R$900, se quantidade vendida for maior ou igual a 200 unidades e o valor total das vendas for maior ou igual a R$600.000;
c. Bônus de R$300, se quantidade vendida for maior ou igual a 300 unidades e o valor total das vendas for maior ou igual a R$400.000;
d. Bônus de R$100, se o valor total das vendas for maior ou igual a R$200.000;
e. Bônus de R$0, caso nenhuma das condições anterior for atingida.
14. Calcular o valor do seguro para automóveis com base no valor do automóvel (V), sua marca (M) e idade do condutor (C):
a. Valor = (6% V + R$250) * 1,10 , se M=”FIAT” ou C>60;
b. Valor = (6% V + R$300) * 1,08 , se M não for “FIAT” e C entre 30 e 60 (inclusive);
c. Valor = (6% V + R$500) * 1,09 , se M não for “FIAT” e C entre 18 e 29