Algoritmos

...

EscrevaL ("Maria de Jesua 1647")

EscrevaL ("Paulo José 5003")

EscrevaL ("Marco Antonio 4588")

Fimalgoritmo

9. Solicitar ao usuário o preço atual do produto. Calcular o novo preço de um produto, sabendo que o preço atual sofre um desconto de 10%.

Resolução:

Algoritmo "Exercicio9"

Var P1, Nova: Real

Inicio

EscrevaL ("Digite o valor atual do produto")

Leia (P1)

Nova

EscrevaL ("O novo valor é:", Nova)

Fimalgoritmo

22. No bairro São João da Barra, na cidade de Mirandópolis, a companhia telefônica lançou uma promoção cada 30 moradores que fizer a adesão do seu plano de TV, internet e telefone, pagarão apenas o valor de R$ 100,00 por cada assinatura e, além disso, ganharia um bônus de R$ 67,00 no primeiro mês de cada assinatura. Escreva um algoritmo para calcular qual o valor da assinatura total.

Resolução:

Algoritmo "Exercicio22"

Var Quant, PrimeiraM, MensalidadeSD: Real

Inicio

EscrevaL ("Digite quantos planos irá aderir")

Leia (Quant)

PrimeiraM

EscrevaL ("O valor da sua primeira mensalidade com desconto é", PrimeiraM)

MensalidadeSD

EscrevaL ("O valor das suas mensalidades serão", MensalidadeSD)

Fimalgoritmo

Exercícios escolhidos:

1. O 1º primeiro e o 2º bimestre na FAC possuem peso diferente. Faça um programa que receba a notas de cada bimestre e calcule a média final, de acordo com as regras da instituição.

Resolução:

Algoritmo "Exercicio1"

Var pbi, spb, Nota: Real

// pbi= primeiro bimestre

// spb= segundo bimestre

Inicio

EscrevaL ("Digite sua nota do primeiro bimestre")

Leia (pbi)

EscrevaL ("Digite sua nota do segundo bimestre")

Leia (spb)

Nota

EscrevaL ("Nota final", nota)

Fimalgoritmo

5. Desenvolva um algoritmo que receba o valor de um ângulo em graus e exiba o seu valor em radianos DICA: como converter 1º. Grau para Radiano? 180º. Graus = π, π = 3.141593 no visualg PI é uma variável RESERVADA, use como nome da variável numPI.

Resolução:

Algoritmo "Exercicio5"

Var Grau, Radiano: Real

Inicio

EscrevaL (" Digite o valor de um ângulo em grau")

Leia (Grau)

Radiano

EscrevaL ("Graus em Radiano=", Radiano)

Fimalgoritmo

12. Faça um programa que leia o valor da base e altura de um triangulo e calcule o valor da sua área.

Resolução:

Algoritmo "Exercicio12"

Var base, altura, área: Real

Inicio

EscrevaL ("Digite a base do triangulo retângulo em cm.")

Leia (base)

EscrevaL ("Digite a altura do triangulo retângulo em cm.")

Leia (altura)

Área: = base*altura/2

EscrevaL ("A área do triangulo retângulo é:", área)

Fimalgoritmo