saysasilva

Fazer o programa com o PARA-FIMPARA e também com vetores: Alguém pode me ajudar?? 1. Faça um programa para gerar dados dos 230 registros contendo: A inscrição sendo de um sequencial a partir de 500. Origem escolar (1- publica ou 2- particular) Local (1- Macaé ou 2- Região) pontuação de (1-100) nível de informática (40 ate 60 pontos- básico; 51 a 80- intermediário ; 81 a 100- avançado) OBS: nível abaixo de 40 não classificado. calcular: 2- media da pontuação obtida de todos os candidatos; 3- o percentual de jovens de macae e regiao; 4- percentual de jovens por nível de informática; 5- percentual de jovens de escola publica com o nível de informática avançado; 5- maior pontuação obtida com o respectivo numero de inscrição. Eu fiz assim: Var // Seção de Declarações das variáveis cont, org, local, pont, tbas, tint, tavan, mac, reg, part, pub, pubAv, mpont, mcont: inteiro mediapont, totpont, percmac, percreg, percbas, percint, percavan, percPubAv:real Inicio // Seção de Comandos, procedimento, funções, operadores, etc... cont<-0 escreval( " N° Origem Escolar - Localidade - Ponto - Nivel C.I ") para cont de 500 ate 729 faca org<-randi(2)+1 local<-randi(2)+1 pont<-randi(101) escreva(cont, "- ") //Origem Escolar se org=1 então escreva(" Pública -") pub<-pub+1 se pont>80 então pubAv<-pubAv+1 fimse fimse se org=2 então escreva(" Particular -") part<-part+1 fimse //Localidade se local=1 então escreva(" Macaé -") mac<-mac+1 fimse se local=2 então escreva(" Região -") reg<-reg+1 fimse //Nivel de conhecimento em Informática se (pont<40) então escreva(" ", pont:4, " - Não Classificado") fimse se (pont>=40) e (pont<=60) então escreva (" ", pont:4, " - Básico ") tbas<-tbas+1 fimse se (pont>60) e (pont<=80) então escreva (" ", pont:4, " - Intermediario ") tint<-tint+1 fimse se (pont>80) então escreva (" ", pont:4, " - Avançado ") tavan<-tavan+1 fimse se pont>mpont então mpont<-pont mcont<-cont fimse //total dos pontos totpont<-totpont+pont fimpara escreval(" ") escreval("=====================================================") //2-calcule a media de todos os candidatos mediapont<-(totpont/cont) escreval(" Média de todos os candidatos: ", mediapont:3:2) //3-Percentual de jovens oriundo em macaé e região escreval(" ") escreval(" =====================================================") percmac<-(mac/cont)/100 escreval(" Percentual de jovens em Macaé : ", percmac:3:4) percreg<-(reg/cont)/100 escreval(" Percentual de jovens em Região: ", percreg:3:4) //4-Percentual de jovens por nivel escreval(" ") escreval(" =====================================================") percbas<-(tbas/cont)/100 escreval(" Percentual de jovens em basquete : ", percbas:3:4) percint<-(tint/cont)/100 escreval(" Percentual de jovens em Intermediário : ", percint:3:4) percavan<-(tavan/cont)/100 escreval(" Percentual de jovens em Avançado : ", percavan:3:4) //5-Percentual de jovens na escola publica no nivel avançado escreval(" ") escreval(" =====================================================") percPubAv<- (pubAv/pub)*100 escreval(" Percentual de jovens de Esc. Pub. no Nivel Avançado : ", percPubAv:3:2) //6-A maior pontuação obtida + o n° de inscrição escreval(" ") escreval(" =====================================================") escreval(" A maior pontuação obtida e o respectivo n° de inscrição :") escreval(" --------> Ponto: ", mpont, " --- N° ", mcont, " <--------") escreval(" ") escreval(" ========================FIM==========================") Fimalgoritmo