Profº Piva - Lista de Exercícios - 8)Fazer um programa para calcular a soma dos N primeiros números, onde N é lido. Ex.: N=5. Soma = 1+2+3+4+5

algoritmo "Soma dos N"
varn,soma:numerico
inicioescreval("Informe o valor do numero.")
leia(n)
repita
somal<-soma+n
n<-n-1
ate (n=0)
escreval("soma =",soma)
fimalgoritmo

Profº Piva - Lista de Exercícios - 7)Leia um numero N (inteiro, positivo >5). Depois, leia para um determinado grupo de pessoas (N) as seguintes informações: Idade, Peso, Sexo. Este programa deve fornecer como saída: a) A média dos pesos dos homens; b) A média das idades das mulheres; c) Quantas mulheres acima de 25 anos.

algoritmo "Média dos pesos e idades e quantidade de mulheres acima dos 25 anos"

var

  n,contadoramulheresacima25,qtdehomens,contadoramulheresnormal:inteiro

  idade:inteiro

  peso,somapesohomens,somaidademulheres:real

  sexo:literal

  mediapeso,mediaidade:numerico

inicio

  Repita

  escreval ("Digite um número inteiro e maior que cinco")

  leia (n)

  ate (n>=5)

  Repita

  escreval ("Digite a idade")

  leia (idade)

  escreval ("Digite o seu peso")

  leia (peso)

  escreval ("Digite o seu sexo")

  leia (sexo)

  se (sexo="m") entao

     somapesohomens <- somapesohomens+peso

     qtdehomens <- qtdehomens+1

   senao

     contadoramulheresnormal <- contadoramulheresnormal+1

     somaidademulheres <- somaidademulheres+idade

       se (idade>25) entao

       contadoramulheresacima25 <- contadoramulheresacima25+1

       fimse

     fimse

     n <- n-1

  ate (n<=0)

  mediapeso <- somapesohomens/qtdehomens

  mediaidade <- somaidademulheres/contadoramulheresnormal

  escreval ("A média dos pesos dos homens", mediapeso)

  escreval ("A média das idades das mulheres", mediaidade)

  escreval ("Quantidade de mulheres acima de 25 anos", contadoramulheresacima25)

              fimalgoritmo

Profº Piva - Lista de Exercícios - 3)Faça um programa que, dado um número, imprima a sua tabuada completa.

algoritmo "Tabuada"

var

  n,x,tabuada:real

inicio

  x <- 0

  escreval ("Digite um número para tabuada")

  leia (n)

  Repita

  tabuada <- n*x

  escreval (n, "*", x, "=", tabuada)

  x <- x+1

  ate (x>=11)

fimalgoritmo

Profº Piva - Lista de Exercícios - 1)Faça um programa que calcule a média aritmética de 35 alunos do curso de Algoritmos. Use comandos de repetição.

algoritmo "Media"

var

  media, nota, soma:real

  i:inteiro

inicio

  soma <- 0

  para i de 1 ate 35 faca

  escreva ("Digite a", i, "a nota:")

  leia (nota)

  soma <- soma+nota

  fimpara

  media <- soma/35

  escreva ("A media e igual a", media)

fimalgoritmo

Profº Piva - Algoritmos - Exercícios Capítulo 3.18) Escreva um algoritmo que leia as notas das duas primeiras provas de um aluno (p1 e p2) e calcule qual o valor mínimo da terceira nota (p3), para que este aluno seja aprovado, considerando que a média aritmética mínima das três provas deva ser 6.0 para que o aluno seja aprovado.

algoritmo "Nota Final"

var
  n1,n2,n3,media:real
inicio
  escreval ("Digite a primeira nota")
  leia (n1)
  escreval ("Digite a segunda nota")
  leia (n2)
  n3 <- 18-(n1+n2)
  escreval ("A terceira nota minima deve ser igual a:", n3)
 
fimalgoritmo