Question

Usando o algoritmo desenvolvido na atividade semanal 3, elabore um algoritmo para ler as informações de 5 alunos:
O algoritmo deverá ler:
O valor da mensalidade do curso. Fazer crítica (restrição)para que não seja aceito o valor 0 (zero) ou negativo.
Oturno do curso escolhido (M para manhã, T para tarde e N para noite). Fazercrítica (restrição) para aceitar apenas os níveis M para manhã, T para tarde ou N para noite.
Acategoria do aluno (B para baixa renda e N para renda normal). Fazer crítica (restrição)para aceitar apenas os tipos B para renda familiar baixa ou N para renda familiar normal.
O algoritmo deverá calcular e exibir:
Valor total do curso durante 1 ano (valor da mensalidade do curso vezes 12);
O valor da mensalidade do aluno. Essa mensalidade poderá sofrer alterações, dependendo do turno escolhido e da categoria do aluno, conforme descrito abaixo:
- Caso o turno escolhido for M (manhã), não haverá nenhum desconto;
- Caso o turno escolhido for T (tarde), será atribuido um desconto de 5%;
- Caso o turno escolhido for N (noite), será atribuido um desconto de 10%
ATENÇÃO: Para alunos classificados na categoria de renda familiar baixa, será acrescido um desconto adicional de 10%, independentemente do turno escolhido.
No final o algoritmo deve informar quantos alunossão de baixa renda e quantos tem renda familiar normal.
Você pode elaborar este algoritmo, a partir do algoritmo desenvolvido na atividade da competência anterior.
Após elaborar e testar o algoritmo, salve-o com o primeiro e segundo nome dos componentes da dupla e publique no ambiente virtual.

Answer 1

var
i, quantaln: inteiro
mensalidade, desconto, valor: real
turno, categoria : caractere
inicio
quantaln <- 0
mensalidade <- 0
para i de 1 ate 5 faca   
enquanto (mensalidade<=0) faca      
escreval("Informe sua mensalidade")      
escreval("")      
leia (mensalidade)      
escreval("")      
se (mensalidade<=0) entao         
escreval("Valor invalido.")      
fimse   
fimenquanto   
enquanto ((turno<>"M") E (turno<>"T") E (turno<>"N")) faca
escreval("Informe seu turno")      
escreval("M - para manhã")      
escreval("T - para tarde")      
escreval("N - para noite")      
escreval("")      
leia(turno)      
escreval("")      
se ((turno<>"M") E (turno<>"T") E (turno<>"N")) entao         
escreval ("Turno invalido.")         
escreval("")      
fimse   
fimenquanto
enquanto ((categoria<>"B") E (categoria<>"N")) faca      
escreval("Informe sua categoria")      
escreval("B - para renda baixa")      
escreval("N - para renda normal")      
leia(categoria)      
escreval("")      
escreval("")      
se ((categoria<>"B") E (categoria<>"N")) entao         
escreval("Categoria invalida.")         
escreval("")      
fimse   
fimenquanto
se(categoria="N") entao
quantaln <- quantaln + 1
fimse
valor <- mensalidade
se(turno="T") entao
desconto <- mensalidade * 5/100
valor <- mensalidade - desconto
fimse
se(turno="N") entao
desconto <- mensalidade * 10/100
valor <- mensalidade - desconto
fimse
se categoria="B" entao
desconto <- valor * 10/100
valor <- valor - desconto
fimse      
escreval("Mensalidade: ", valor, " R$")   
escreval("Valor total do curso: ", valor*12)   
escreval("")   
escreval("")   
escreval("")
valor <- 0
desconto <- 0
categoria <- "O"
mensalidade <- 0
turno <- "O"
fimpara
escreval("Numero de alunos com renda normal  ", quantaln)
escreval ("Numero de alunos com renda baixa ", 5-quantaln)
fimalgoritmo

Obs: Algoritmo desenvolvido por mim, e deu um trabalhinho valorize com estrelinhas e obrigado.. :)
Um abraço!