numeros para fazer a media.") fimsefimalgoritmo 5 - Faca um programa que fique lendo 2 notas, calcule e mostra a media, enquanto o usuario quiser. Dica, leia 0 (Nao) ou 1 (Sim) para fazer o teste.algoritmo5var op:inteiro n1, n2, media: realinicio repita escreva("digite a primeira nota: ") leia(n1) escreva("digite a segunda nota: ") leia(n2) media<- (n1+n2)/2 escreval("a media e ",media) escreval("deseja fazer outro calculo? digite 0 para nao e 1 para sim") repita leia(op) se (op<>0) e (op<>1) entao escreval("operacao invalida, digite novamente.") fimse ate (op=0) ou (op=1) ate op=0fimalgoritmo6 - Faca um programa que leia um numero N e que indique quantos valores inteiros e positivos devem ser lidos a seguir. Para cada numero lido, mostre uma tabela contendo valor lido e o fatorial desse valor.algoritmo6var n, num, i, j, fat:inteiroinicio escreval("quantos fatoriais voce quer calcular?") leia(n) para i <- ate n faca escreval("digite um numero para calcular o fatorial.") leia(num) fat<- 1 para j <- 1 ate num faca fat<- fat*j fimpara escreval("o fatorial de ", num," e ", fat) fimparafimalgoritmo7 - Foi feita uma estatistica em cinco cidades brasileiras para coletar dados sobre acidentes de transito, foram obtidos os seguintes dados:a) Codigo da cidade;b) Numero de veiculos de passeio(em 2010);c) Numero de acidentes de transito com vitimas(em 2010).Deseja-saber:a) Qual o maior e menor indice de acidentes de transito e a que cidades pertencem;b) Qual a media de veiculos nas cinco cidades juntas;c) Qual a media de acidentes de transito nas cidades com menos de 2.000 veiculos de passeio.algoritmo7var cont, cod, num_vei, num_acid, maior, cid_maior, menor, cid_menor: inteiro media_vei, media_acid: real soma_vei, soma_acid, cont_acid:inteiroinicio soma_vei <-0 soma_acid <-0 cont_acid <- 0 para cont <- 1 ate 5 faca escreval("digite o codigo da cidade, o numero de veiculos e o numero de acidentes" ) leia(cod, num_vei, num_acid) se (cont=1) entao maior <- num_acid cid_maior <- cod menor <- num_acid cid_menor <- cod senao se (num_acid > maior) entao maior <- num_acid cid_maior <- cod fimse se (num_acid < menor) entao menor <- num_acid cid_menor <- cod fimse fimse soma_vei <- soma_vei + num_vei se (num_vei < 2000) entao soma_acid <- soma_acid + num_acid cont_acid <- cont_acid + 1 fimse fimpara escreval("o maior indice e ",maior," na cidade ",cid_maior) escreval("o menor indice e ",menor," na cidade ",cid_menor) media_vei <- soma_vei / 5 escreval("a media de veiculos e ",media_vei) se (cont_acid = 0) entao escreval("nao foi digitada nenhuma cidade com menos de 2000 veiculos" ) senao media_acid <- soma_acid / cont_acid escreval("a media de acidentes em cidades com menos de 2.000 veiculos e ", media_acid) fimsefimalgoritmoNa aula de hoje tive bastante dificuldade, principalmente na questao 7, pois ao meu ver e uma questao bem complexa e que exige muita logica alem de ser bem extensa, apos a explicacao do professor acabei entendendo. Agora esta acalmando o temor da materia e dando para perceber onde estao os erros. Aprendi que toda a variavel que for utilizada para divisao obrigatoriamente tera de ser real caso houver um resultado com virgula.function click() {if (event.button==2||event.button==3) {oncontextmenu='return false'; alert ('Todos os direitos reservados');}}function keypresed() {alert(' Todos os direitos