algoritmo "BONIFICACAO DE FUNCIONARIOS" varvalormensal, valortotal, valorbonifica, valormensalbonifica: realnivelcurso, tipoaluno: literalinicioescreva("Qual o valor da mensalidade: R$ ")leia(valormensal)escreval(" ")escreval("Qual o nível do curso?")escreval(" ")escreval("I Para educação infantil")escreval("B Para educação básica")escreval("M Para ensino médio")escreval(" ")escreva("Escolha uma opção e tecle enter: ")leia(nivelcurso)escreval(" ")escreval("Qual o tipo de aluno?")escreval(" ")escreval("F Para funcionário")escreval("D Para dependente")escreval(" ")escreva("Escolha uma opção e tecle enter: ")leia(tipoaluno)escreval(" ")valortotal <- valormensal * 12se ((nivelcurso = "i") ou (nivelcurso = "I") ou (nivelcurso = "m") ou (nivelcurso = "M")) e ((tipoaluno = "d") ou (tipoaluno = "D")) entaovalorbonifica <- ((valormensal*5)/100) + ((valormensal*30)/100)valormensalbonifica <- valormensal - valorbonificaescreval("O valor total é: R$",valortotal)escreval("O valor mensal da bonificação é de: R$",valorbonifica)senaose ((nivelcurso = "i") ou (nivelcurso = "I") ou (nivelcurso = "m") ou (nivelcurso = "M")) e ((tipoaluno = "f") ou (tipoaluno = "F")) entaovalorbonifica <- ((valormensal*5)/100) + ((valormensal*50)/100)valormensalbonifica <- valormensal - valorbonificaescreval("O valor total é: R$",valortotal)escreval("O valor mensal da bonificação é de: R$",valorbonifica)senaose ((nivelcurso = "b") ou (nivelcurso = "B")) e ((tipoaluno = "d") ou (tipoaluno = "D")) entaovalorbonifica <- (valormensal*30)/100)valormensalbonifica <- valormensal - valorbonificaescreval("O valor total é: R$",valortotal)escreval("O valor mensal da bonificação é de: R$",valorbonifica)senaose ((nivelcurso = "b") ou (nivelcurso = "B")) e ((tipoaluno = "f") ou (tipoaluno = "F")) entaovalorbonifica <- (valormensal*50)/100)valormensalbonifica <- valormensal - valorbonificaescreval("O valor total é: R$",valortotal)escreval("O valor mensal da bonificação é de: