AULA 11

cheguei na aula e levei um pequeno susto aula de algoritmos ao inves de ingles mas tranquilo isso vem mais a acalhar
 
6- Faça um programa que leia o numero "N" e que indique quantos valores inteiros e positivos devem ser lidos a seguir. Para cada número lido, mostre uma tabela contendo o valor lido, mostre uma tabela contendo o valor e o fatorial desse valor:
algoritmo "valor_fatorial"

var
    n,num,y,x:inteiro
    fat:real
inicio
   escreva("Número de operações fatoriais: ")
   leia(n)
   para x de 1 ate n faca
      escreva("Escreva algum numero que deseje fatorar: ")
      leia(num)
      fat<-1
      para y de 1 ate num faca
         fat<-fat*y
         escreval(fat)
      fimpara
   fimpara
fimalgoritmo

7- Foi feita uma estatística em cinco cidades brasileiras para coletar dados sobre acidentes de transito.
Foram obtidas os seguintes dados:
   a)O código da cidade;
   b)Número de veículos de passeio (em 2010)
   c)Número de acidentes de transito com vitimas (em 2010)
Deseja-se saber:
   a)Qual o maior e o menor índice de acidentes de transito e a que cidade eles pertencem;
   b)Qual a média de veículos nas cinco cidades juntas;
   c)Qual a média de acidentes de transito nas cidades com menos de 2000 veículos de passeio.

algoritmo "estatistica"
var
   x,caros,acidentes,carosx,acidentesx,acidentesy,contador,acidentes_m,n:inteiro
   city,city_a,city_m_a:caracter  //variaveis onde vai o nome da cidade
   media_caros,media_a:real
inicio
   carosx<-0
   n<-5 //número de vezes.
   acidentesx<-0
   acidentesy<-10000000
   contador<-0
   acidentes_m<-0
   para x de 1 ate n faca
      escreval("Digite a cidade, o número de veiculos e o número de acidentes com vitimas")
      escreva("Nome da cidade: ")
      leia(city)
      escreva("Escreva o número de caros de ",city,": ")
      leia(caros)
      escreva("Escreva o número de acidentes com vitimas de ",city,": ")
      leia(acidentes)
      carosx<-caros+carosx
      se (acidentes > acidentesx) entao
         acidentesx<-acidentes
         city_a<-city
      fimse
      se (acidentesy = 0) entao
         acidentesy<-acidentes
      fimse
      se (acidentes < acidentesy) entao
         acidentesy<-acidentes
         city_m_a<-city
      fimse
      se (caros>=2000) entao
         acidentes_m<-acidentes+acidentes_m
         contador<-contador+1
      fimse
      limpatela
   fimpara
   media_caros<-carosx/n
   escreval("O maior número de acidentes ocorre em ",city_a,".")
   escreval("O menor néumero de acidentes ocorre em ",city_m_a,".")
   escreval("A média de caros das 5 cidades são",media_caros,".")
   media_a<-acidentes_m/contador
   se (contador <> 0) entao
      escreval("A média de acidentes em cidades de mais de 2000 caros é",media_a,".")
   senao
      escreva("Nenhuma cidade tem mais de 2000 caros")
   fimse
fimalgoritmo

essa aula ajudou bastante mesmo não tando prevista e eu so com o note sem meu caderno de algoritos,
fico bom assim não tinha muitos lugares de pesquisa porque minhas anotações ficaram em casa mas isso me ajudou.