AULA 19
Autor: Daniel Santos | Publicado: 2011-06-23T20:07:00-07:00

&nbsp;hoje comesamos a estudar vetores dizem que isso e um bicho de 7 cabesas mas não achei nem a primeira delas srsrs,mas&nbsp; ja to me preparando porque to vendo que nesa parte a coisa vai pega fogo
1- Faça um programa que leia 10 nomes de alunos e guarde em uma lista.

algoritmo "exec_01_aula19"
var
&nbsp; &nbsp;n:vetor [1..10] de caracter
&nbsp; &nbsp;x:inteiro
inicio
&nbsp; &nbsp;para x de 1 ate 10 faca
&nbsp; &nbsp; &nbsp; escreva("Digite o nome do aluno",x,": ")
&nbsp; &nbsp; &nbsp; leia(n[x])
&nbsp; &nbsp;fimpara
fimalgoritmo

2- Faça um programa que leia 10 nomes de alunos e suas medias finais, e  guarde em listas. Ao final, listar o nome do aluno e sua media mostrando  "Aprovado" se a média for maior ou igual a 7, ou "Reprovado" caso  contrario. 
algoritmo "exec_02_aula19"
var
&nbsp; &nbsp;x:inteiro
&nbsp; &nbsp;nome,r:vetor[1..10] de caracter
&nbsp; &nbsp;media:vetor[1..10] de real
inicio
&nbsp; &nbsp;para x de 1 ate 10 faca
&nbsp; &nbsp; &nbsp; escreva("Digite o nome do aluno",x,": ")
&nbsp; &nbsp; &nbsp; leia(nome[x])
&nbsp; &nbsp; &nbsp; escreva("Digite a média do ",nome[x],": ")
&nbsp; &nbsp; &nbsp; leia(media[x])
&nbsp; &nbsp; &nbsp; se (media[x] &gt;= 7) entao
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;r[x]&lt;-"Aprovado"
&nbsp; &nbsp; &nbsp; senao
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;r[x]&lt;-"Reprovado"
&nbsp; &nbsp; &nbsp; fimse
&nbsp; &nbsp; &nbsp; limpatela
&nbsp; &nbsp;fimpara
&nbsp; &nbsp;para x de 1 ate 10 faca
&nbsp; &nbsp; &nbsp; escreval("O aluno ",nome[x]," tirou",media[x],", ele foi ",r[x],".")
&nbsp; &nbsp;fimpara
fimalgoritmo

3- Faça um programa que leia 50 valores reais e guarde os em um vetor. Ao final mostre a soma e a média dos valores lidos. 
algoritmo "exec_03_aula19"
var
&nbsp; &nbsp;x,soma:inteiro
&nbsp; &nbsp;v:vetor[1..50] de real
&nbsp; &nbsp;media:real
inicio
&nbsp; &nbsp;soma&lt;-0
&nbsp; &nbsp;para x de 1 ate 50 faca
&nbsp; &nbsp; &nbsp; escreva("Digite um valor real: ")
&nbsp; &nbsp; &nbsp; leia(v[x])
&nbsp; &nbsp; &nbsp; soma&lt;-soma+v[x]
&nbsp; &nbsp;fimpara
&nbsp; &nbsp;limpatela
&nbsp; &nbsp;media&lt;-soma/50
&nbsp; &nbsp;escreva("A soma total foi",soma," e a média foi",media,".")
fimalgoritmo



4- Faça um programa que calcule a media ((nota1+nota2)/2) de 10 alunos e  guarde em um vetor, percorra o vetor e mostre as medias. Ao final  mostre a media geral do turno.   
algoritmo "exec_04_aula19"
var
&nbsp; &nbsp;n1,n2,soma,media_t:real
&nbsp; &nbsp;media:vetor[1..10] de real
&nbsp; &nbsp;x:inteiro
inicio
&nbsp; &nbsp;soma&lt;-0
&nbsp; &nbsp;para x de 1 ate 10 faca
&nbsp; &nbsp; &nbsp; escreval("Digite as notas do aluno",x)
&nbsp; &nbsp; &nbsp; leia(n1)
&nbsp; &nbsp; &nbsp; leia(n2)
&nbsp; &nbsp; &nbsp; media[x]&lt;-((n1+n2)/2)
&nbsp; &nbsp; &nbsp; escreval("Média do aluno",x," é",media[x],".")
&nbsp; &nbsp; &nbsp; soma&lt;-soma+media[x]
&nbsp; &nbsp;fimpara
&nbsp; &nbsp;media_t&lt;-soma/10
&nbsp; &nbsp;escreval("******************************")
&nbsp; &nbsp;escreva("Média da turma é",media_t,".")
fimalgoritmo

5- Faça um programa que mostre o mês do ano de acordo com o número (de 1 a 12) informado pelo&nbsp;usuário. 
algoritmo "exec_05_aula19"
var
&nbsp; &nbsp;mes:vetor [1..12] de caracter
&nbsp; &nbsp;m:inteiro
inicio
&nbsp; &nbsp;mes[1]&lt;-"Janeiro"
&nbsp; &nbsp;mes[2]&lt;-"Fevereiro"
&nbsp; &nbsp;mes[3]&lt;-"Março"
&nbsp; &nbsp;mes[4]&lt;-"Abril"
&nbsp; &nbsp;mes[5]&lt;-"Maio"
&nbsp; &nbsp;mes[6]&lt;-"Junho"
&nbsp; &nbsp;mes[7]&lt;-"Julho"
&nbsp; &nbsp;mes[8]&lt;-"Agosto"
&nbsp; &nbsp;mes[9]&lt;-"Setembro"
&nbsp; &nbsp;mes[10]&lt;-"Outubro"
&nbsp; &nbsp;mes[11]&lt;-"Novembro"
&nbsp; &nbsp;mes[12]&lt;-"Dezembro"
&nbsp; &nbsp;escreva("Digite um numero que representa o mês: ")
&nbsp; &nbsp;leia(m)
&nbsp; &nbsp;escreva(mes[m])
fimalgoritmo&nbsp;nesses programas de hoje tava legal a parte de vetores bem vasil de faser e enteder consegui faser fasilmente com a ajuda do prf.