terça-feira, 28 de maio de 2013

Faça um algoritmo para receber a idade e o sexo de um grupo indeterminado de pessoas exibindo ao final a quantidade de pessoas do sexo feminino.

algoritmo "Quantidade_Feminino"
var
sexo, resposta: caractere
continua, idade, qtd: inteiro
inicio
enquanto continua = 0 faca
   escreval ("Informe o sexo (F ou M): ")
   leia (sexo)
   escreval ("Informe a idade:")
   leia (idade)
   se sexo = "F" entao
      qtd <- qtd + 1
   fimse
   escreval ("Continua (S/N): ")
   leia (resposta)
   se resposta = "N" então
      continua <- 1
   fimse
fimenquanto
escreval ("O total de mulheres é: ", qtd)
fimalgoritmo
segunda-feira, 27 de maio de 2013

Faça um algoritmo para receber o nome e a idade de 20 pessoas exibindo ao seu final a média das idades.

Algoritmo "Media_Alunos"
Var
med, contador, idade: real
nome: caractere
Inicio
contador <- 1
med <- 0
enquanto contador <= 20 faca
   escreval ("Informe o nome: ")
   leia (nome)
   escreval ("Informe a idade: ")
   leia (idade)
   med <- med + idade
   contador <- contador + 1
fimenquanto
med <- med/20
escreval ("Média de idade é: ", med)
fimalgoritmo
segunda-feira, 13 de maio de 2013

Faça um algoritmo que receba a idade de 75 pessoas e mostre mensagem informando “maior de idade” e “menor de idade” para cada pessoa.


Faça um algoritmo que receba a idade de 75 pessoas e mostre mensagem informando “maior de idade” e “menor de idade” para cada pessoa.
Considere a idade a partir de 18 anos como maior de idade.


algoritmo "Exemplo18"
// Função :
// Autor :
// Data :
// Seção de Declarações
var
idade, maior, menor, cont: inteiro
inicio
// Seção de Comandos
cont <- 0
enquanto cont < 75 faca
   escreval ("Informe a sua idade: ")
   leia (idade)
   se idade <= 17 entao
      escreval ("Você é menor de idade!")
   senao
      escreval ("Você é maior de idade!")
   fimse
   cont <- cont + 1
fimenquanto
fimalgoritmo

 
;