Algoritmo

algoritmo "Intervalo"
// Autor : Jose Edson e Zaqueu Honorio
// Questao 17 var num, i, quant :inteiro inicio escreval("
TABELA DO INTERVALO ENTRE NUMEROS
")
escreval(" ") quant <- 0 para i de 1 ate 80 faca escreva(" Digite um numero: ") leia(num) se(num > 10) e (num < 150)entao quant <- quant + 1 fimse fimpara escreval(" ") escreval(" A quantidade de numero(s) entre 10 e 150 foi: ",quant) escreva(" ") fimalgoritmo algoritmo "Sexo"
// Autor : Jose Edson e Zaqueu Honorio
// Questao 19 var nome, sex : caracter quantH, quantM, i : inteiro inicio escreval("
TABELA DO SEXO
")
escreval(" ") quantH <- 0 quantM <- 0 para i de 1 ate 56 faca escreva("") escreva(" Digite seu nome: ") leia(nome) escreva(" Sexo M ou F: ") leia(sex) se(sex = "M")entao escreval(" ",nome, " e homem") quantH <- quantH + 1 senao escreval(" ",nome, " e mulher") quantM <- quantM + 1 fimse escreval(" ") fimpara escreval(" Total de homens: ",quantH) escreval(" Total de mulheres: ",quantM) escreva(" ") fimalgoritmo algoritmo "Descontao"
// Autor : Jose Edson e Zaqueu Honorio
// Questao 20 var resp : caracter val_desc, cust_car, cust_cli : real ano, quant00, quantG : inteiro inicio escreval("
TABELA DE DESCONTO
")
escreval(" ") quant00 <- 0 quantG <- 0 escreval(" Deseja calcular desconto? sim ou nao ") leia(resp) escreval(" ") enquanto resp = "sim" faca escreva(" Ano do veiculo: ") leia(ano) escreva(" Preco do veiculo: ") leia(cust_car) se(ano <= 2000)entao val_desc <- cust_car * 0.12 cust_cli <- cust_car - val_desc escreval(" Desconto de: ",val_desc) escreval(" Valor do veiculo com desconto: ",cust_cli) quant00 <- quant00 + 1 quantG <- quantG + 1 senao val_desc <- cust_car * 0.07 cust_cli <- cust_car - val_desc escreval(" Desconto de: ",val_desc) escreval(" Valor do veiculo com desconto: ",cust_cli) quantG <- quantG + 1 fimse escreval(" ") escreval(" Deseja