devair1010

@Duty Parker então como você conseguiu instalar o w11 nele?

@Eli Almeidaa o cálculos estão certos , porém você colocou para fazer esses cálculos dentro do Loop "enquanto / fimenquanto" , e funciona desse modo , sim , mas vai ficar repetindo isso várias vezes e ocupando os recursos do processador à toa , seria melhor colocar esses cálculos depois do Loop , e serão feitos apenas uma vez , e do modo como está , seu código vai computar o último número também , o zero , pois o zero será consiferado como sendo do tipo "par" , e aumentando assim a quantidade dos números pares , em uma unidade , e a conta finaL então estará com certeza errada , e apenas organizando seu código para ficar mais fácil de ler e adicionei uma comparação para sair do loop assim que digitar o zero , e também isolei essa segunda comparação , pois não precisa dela , pois se um número não for do tipo "Par" então será lógico que só poderá ser do tipo "ímpar" , diminuindo a quantidade de linhas do programa , igualmente as duas linhas referentes a inicialização das variáveis "contpar" e "contimpar" : Algoritmo "media de par e impar" Var num,contpar,contimpar : inteiro somarpar,somarimpar : inteiro mediapar,mediageral : real Inicio num <- 1 //contpar <- 0 não precisa inicializar pois já foi //contimpar <- 0 inicializada ao ser criada lá no inIcio enquanto num > 0 faca escreval(" Digite um número inteiro positivo ou 0 para encerrar") leia( num ) se num = 0 então interrompa // faz sair desse loop "enquanto" e continuar fimse // depois dele "fimenquanto" se num % 2 = 0 então contpar <- contpar + 1 somarpar <- somarpar + num senao //se num % 2 = 1 então não precisa dessa comparaCAo contimpar <- contimpar + 1 // pois se não for par só pode ser Impar somarimpar <- somarimpar + num //mediageral <- ( somarpar + somarimpar ) / ( contpar + contimpar ) //fimse fimse fimenquanto se contpar > 0 então // validar a divisao por zero , senAo dAh ruim né mediapar <- somarpar / contpar fimse mediageral <- ( somarpar + somarimpar ) / ( contpar + contimpar ) escreval ("") escreval ("A quantidade de números pares é ----: " ,contpar) escreval ("") escreval ("A quantidade de números ímpares é --: " ,contimpar) escreval ("") escreval ("A média de números pares é ---------: " ,mediapar) escreval ("") escreval ("A média geral dos números lidos é --: ",mediageral) escreval ("") Fimalgoritmo

@José Felipe Amaral olá , portugol pode ser feito em vários IDE um deles é o Portugol Studio que tem muitas funções boas de se usar e até mesmo gráficos , e tem outros mais básicos como o visualG 3.0.6.5 , uma versão estável , e que tem poucas possibilidades , e é bem simples de usar também , e nele você pode usar a função "copia" para extrair os dígitos de um número inteiro e verificar os maiores que os outros para classifica los , e se você tiver feito um código sobre esse exercício , poste ele aqui e ajudaremos .

@Eli Almeidaa com o mod verifica se é par ou ímpar , e incrementa um contador de patres e ímpares . enquanto num > 0 faca // Loop repete leia( num ) se num = 0 então // se digitou zero interrompa // sai desse Loop enquanto fimse // e continua depois do fimenquanto se num mod 2 = 0 então pares <- pares + 1 // soma uma unidade ao conteúdo da variAvel pares senao impares <- impares + 1 fimse fimenquanto escreval("total de Pares ",pares)

@Eli Almeidaa para saber a quantidade de pares e ímpares você pode usar o operador "Mod" .

@Eli Almeidaa essa é uma questão de interpretar o que pede no enunciado , e pelo que entendi , precisa pegar o número da carteira e a quantidade de multas , e pegar também o valor de cada multa separadamente , pois pode ter de valores diferentes , e depois mostrar esse valor total , e também para sair do programa ao Digitar o nÚmero 0 , precisa colocar uma condição com o comando se , pois em qualquer tipo de loop , mesmo ao digitar 0 ele vai continuar e pedir os dados do mesmo jeito e só depois sair do programa , e seria melhor que assim que digitar o zero ele termine o programa na mesma Hora , e já mostra o somatório do valor total arrecadado com as multas . Algoritmo "detranses" Var cart , mult , i : inteiro val , ax , somatorio : real Inicio cart <-1 enquanto cart <> 0 faca val <- 0.00 // precisa inicializar pois vai repetir para cada multa escreval (" Informe a carteira de motorista ou 0 para finalizar") leia (cart) se cart = 0 então interrompa // esse comando faz sair desse loop enquanto fimse

@Eli Almeidaa essa parte até aí ficou bom , creio que precisa de mais uma variável para armazenar o somatório do valor total arrecadado,

@Eli Almeidaa . Sim está certo, funciona bem como pede o enunciado , apenas você colocou uma linha que não precisa, essa aqui Pois no visualG ao cria a variável o compilador já inicializa ela com o valor zero , caso seja inteiro ou real , e assim não precisa inicializar novamente se o valor for zero .

@Eli Almeidaa não , não é opciomal , não , creio que ninguém coloca comandos desnecessários em um programa , pois além de não ajudar em nada e perder tempo escrever tal comando , ainda atrapalha pois vai aumentar o espaço na memória , e então tudo que está escrito no código é necessário e se remover ou modificar alguma coisa vai fazer falta , pois o código até pode compilar e funcionar , mas vai ter resultado errado , se você estiver se referindo a esse comando aqui aux := 1 esse é o modo de adicionar valor a uma variável no visualG , e recebe 1 porque a primeira posição no vetor de OrdinaL é a posição 1 , onde tem o nome do ordinal do número 1 , e se você remover esse comando , a var aux não vai receber o valor 1 e conterá então o valor 0 e os ordinais ficariam errados . mas se você se refere ao texto "aux recebe 1" , isso pode ser um comentário no algoritmo que são colocado depois desse dois sinais //

@Reirend oi , o que o @lionlucas quis dizer é se seu pc tem placa de vídeo ? , pois pelo jeito é a placa de vídeo mesmo o que aconteceu com meu pc , e a placa ge force 6200 não teve conserto aí removi ela e coloque o cabo VGA no conector da placa principal mesmo e funcionou bem .

@Eli Almeidaa . Qual erro está dando ? , e você está escrevendo os comandos de forma errada , assim não vai funcionar mesmo não , Para para i de 1000 ate < 5 faca , Esse não faz parte da sintaxe do VisualG , não . para i de 1000 ate 1500 faca Esse sim , tem a sintaxe certa e quando faz uma comparação precisa colocar o que é para o compilador fazer , e ali você colocou o "se" "senao" "fimse", mas não colocou nada dentro , e aí o compilador não vai fazer nada mesmo .

@Rafael_248 instalei esse VS Code para ver se aquele vídeo do youtube funciona e sim funciona , seguindo os passos do vídeo , e nem precisou instalar nada de html e nem javaScript que funcionou bem certo mesmo , o css não testei porém creio que vai funcionar também . o programa do hello world em html pode ser assim : para criar um programa no vs code , primeiro , usando o explorer , crie uma pasta em qualquer lugar e coloque o nome onde guardar seus códigos html , e vai no vs code e clique em arquivo / novo arquivo de texto , e coloque o nome do programa que você vai criar , pressione enter e escreva seu código , salve e depois pressione F5 para rodar o código e escolha o navegador que será usado chrome ou edge ou outro que estiver na lista que aparece , e na tela vai surgir essa mensagem "oi Mundo . . . !" <head> <body> <h1>oi<h1>Mundo . . . !</h1> </body> </head>

@Rafael_248 você poderia ter colocado no tópico de c/c#/c++ , mas para instalar e configurar o vs code para usar a lingugem c/c++ tem esse vídeo que explica bem detalhado , nesse link https://www.bing.com/videos/search?q=como+configurar+o+vs+code&docid=607993578189962026&mid=0BFCF32D006FC826E9080BFCF32D006FC826E908&view=detail&FORM=VIRE precisa baixar e instalar o IDE vs code e depois o MinGW , e depois editar as variáveis de ambiente adicionando o caminho do MinGW , e depois instalar as extensões de c++ itellisense e o compile and run , no vs code

@Eli Almeidaa a variável j está servindo como contador de números válidos e também para apontar em qual posição do vetor irá colocar o próximo número válido , por isso a cada número válido encontrado a variável j é incrementada em uma unidade , j <- j + 1 ou pode ser assim tambEm que a mesmo coisa j := j + 1 ou seja soma se mais um ao valor de j que começou em 1 apontando para a primeira posição do vetor v , e no Loop "para / fimpara" você pode escrever dessas três formas // esse sImbolo ( <- ) Eh igual a esse ( := ) e no loop esse ( de ) para c de 1 ate (j-1) faça // o j-1 serve como limite do loop para c <- 1 ate (j-1) faça // sendo que j guarda a qtd de vAlidos // e Eh incrementado em seguida para c := 1 ate (j-1) faça // assim na saIda tem uma unidade a mais // por isso o j-1 para a contaGem ficar certa e o compilador vai entender o que significa e funcionar certo .

@Eli Almeidaa observe o que pede o enunciado , e esse código não está seguindo o enunciado , pois ele diz , primeiro pega os números e coloca no vetor , e só depois remover os inválidos , e depois escrever os número que restaram no vetor , e isso é para o estudante treinar a usar vetores , pois desse modo como pede o enunciado você vai precisar usar o vetor constantemente , e desse modo como você está fazendo , pode funcionar sim , mas você nem precisaria usar vetor , e não aprenderia nada de vetores , é preciso seguir o diz o enunciado , ele é quem manda , e se você não vai segui lo , então estará fazendo por sua conta . e nem precisaria de um enunciado . e o resultado na tela fica todo desajeitado , misturando o que foi digitado pelo que o programa escreve logo em seguida , seu código tem erros falta comandos nrcesários , que você não colocou Algoritmo "numeros positivos" var v : vetor [1..10] de inteiro i : inteiro Inicio para i <- 1 ate 10 faca leia( v[ i ] ) se v[i] > 0 então escreval (v[i]) fimse fimpara // faltou esse Fimalgoritmo

@Eli Almeidaa no seu código você não está pegando os números e já vai comparando , mas não é esse número da variável c , não , e imagino um código parecido com esse seu , e que tem alguns comandos a mais , e é apenas um exemplo de como fazer , mas você pode escolher outras formas de fazer , que melhor lhe convenha e te seja mais favorável , Algoritmo "remover nulos e negativos" // 4) Faça um programa que leia um vetor de dez posições. Em seguida, // retire os valores nulos e negativos e imprima os números que restaram. Var v : vetor [1..10] de inteiro c , j : inteiro Inicio para c <- 1 ate 10 faca // esse Loop vai apenas ler os dez nUmeros leia( v[ c ] ) // e coolcar no vetor fimpara j <- 1 // j será pos onde guardar os vAlidos para c <- 1 ate 10 faca // esse vai pesquisar no vetor se v[c] > 0 então // encontrou nUmero vAlido v[j] := v[c] // recoloca ele no vetor na nova posiCAo j := j + 1 // incrementa posiCAo para outro nUmero fimse fimpara para c de 1 ate (j-1) faca escreval( c,"º ", v[c] ) fimpara Fimalgoritmo e poste uma versão sua , que atenda o que pede o enunciado , para vermos como ficou .

@Eli Almeidaa não está certa pois você está comparando o valor da variável c que não nada a ver com os números no vetor , que são outra coisa , e quando o enunciado diz para ler um vetor , significa que precisar usar o comando leia , pegando os dados do teclado , e colocar no vetor , e essa comparação aqui , não precisa de duas comparações se (c <> 0) e (c > 0) então // se c > 0 Eh lOgico que Eh diferente de zero escreval (c) senao // o que faz esse "senao" aqui ? , nada . fimse // que seria assim : se c > 0 então // se for maior que zero então não Eh neg e nem nulo escreval (c) // e sim positivo fimse e no enunciado tem três partes , 1ª parte - pegar os números digitados e colocar no vetor 2ª parte - remover os números inválidos , os nulos e os negativos , do vetor 3ª parte - rescrever os números , válidos , se houver , que restarem no vetor

@Eli Almeidaa essa 3ª aí , está compilando , mas não dá o resultado desejado , e mesmo para iniciantes esse código não está nada bom , e então , por que você não experimenta fazer do modo tradicional , que seria usar um Loop "laço de repetição" , que diminuiria muito a quantidade de linhas do seu código , pois do jeito que está , tem muita coisa desnecessária , vai dar muito trabalho , para fazer as comparações e ficar imaginando um monte de possibilidade que podem acontecer no algoritmo , além de que o código final teria 3 kb de tamanho e em um pc que tem muita memória , esses 3 Kb é nada , mas se você quiser colocar esse código em um micro controlador pic 16F84A que tem apenas 1 Kb de memória esse programa não serviria , pois não caberia na memória dele , mas se você usar os comando apropriados como loop's e vetores e outros , esse mesmo algoritmo , sem os comentários , teria apenas 1 Kb de tamanho e caberia nesse micro controlador PIC16F84A : Algoritmo "o maiorrr" Var maior , num , i , aux : inteiro ordinal : vetor[1..10] de caractere Inicio ordinal[ 1] := "Primeiro" ordinal[ 2] := "Segundo " ordinal[ 3] := "Terceiro" ordinal[ 4] := "Quarto" ordinal[ 5] := "Quinto" // cada nUmero tem seu respectivo Ordinal ordinal[ 6] := "Sexto " ordinal[ 7] := "Sétimo" ordinal[ 8] := "Oitavo" ordinal[ 9] := "Nono" ordinal[10] := "Décimo" aux := 1 escreval (" Informe dez números inteiros") para i de 1 ate 10 faca // Loop com dez repetiCOes leia( num ) // le o numero digitado se num > maior então // verifica se o nUmero digitado Eh maior // que a var "maior" que foi criada // e inicializada com valor zero , e se sim maior := num // a var "maior" recebe o valor desse nUm // que Eh maior aux := i // var auxiliar armazena a posiCAo na sequencia // de nUmeros digitados para usar o cardinaL fimse // fim da comparaCAo fimpara // fim do Loop "para / fimpara" escreval() escreval("O ",ordinal[ aux ]," número ",maior," , é o Maior . . . !" ) escreval() Fimalgoritmo e essa 5 , pode ser com repita e também com enquanto

@Eli Almeidaa o comando "mod" só funciona com números inteiro , assim se não der para dividir por dois o compilador considera que o resto é o próprio número 1 , pois a parte inteira da divisão de 1 por 2 é igual a zero , e 0 * 2 = 0 , e de 0 para 1 = 1 , assim o resto é 1 .

@arthursoaress teste a memória colocando uma outra que esteja boa , e poste as configurações de se pc .

@Reinaldo_Lopes veja se seu código segue esse exemplo algoritmo "SHOPPING CENTER" var vector : vetor[0..100] de inteiro cad_shopping : vetor[0..100,0..5] de caractere // matriz de nomes nome,resp : caractere tip,cod , opc : inteiro area,condominio: real contador , a : inteiro // ---------------------------------------------------------- procedimento menu // tela de menu inicio limpatela escreval ("________________SHOPPING CENTER________________") escreval ( ) escreval ("___________Digite a opção desejada_____________") escreval ( ) escreval (" 1 - Cadastrar loja ") escreval (" 2 - Consultar loja ") escreval (" 3 - Listagem de todas as lojas ") escreval (" 4 - Sair ") leia ( opc ) limpatela fimprocedimento // ---------------------------------------------------------- procedimento listagem_lojas inicio escreval (" Está no listagem loja" ) escreval para a de 0 ate contador faca escreval( a,"ª Loja " ) escreval("Código --: ", cad_shopping [a,0] ) escreval("Nome ----: ", cad_shopping [a,1] ) escreval("Área ----: ", cad_shopping [a,2] ) escreval("Tipo ----: ", cad_shopping [a,3] ) escreval fimpara escreval escreval("Total De Lojas Cadastradas -> ", contador) escreval escreval(" Tecle Enter" ) leia ( resp ) fimprocedimento // ---------------------------------------------------------- procedimento sair inicio escreval escreval(" Saindo Do Programa . . . !") fimprocedimento // ---------------------------------------------------------- procedimento cadastrar_loja // cadastro de loja inicio escreval(" Está no cadastrar loja") repita escreva ("Código: " ) leia ( cad_shopping [contador,0] ) escreva ("Nome: " ) leia ( cad_shopping [contador,1] ) escreva ("Área: " ) leia ( cad_shopping [contador,2] ) escreval(" 1 - Confecções " ) escreval(" 2 - Alimentação " ) escreval(" 3 - Livros " ) escreval(" 4 - Serviços " ) escreva ("Tipo de 1 a 4 -: " ) leia ( cad_shopping [contador,3] ) contador := contador + 1 escreva ("Cadastrar outra ? 0 - SIM / 1 - NÃO") leia ( resp ) ate resp = "1" fimprocedimento // ---------------------------------------------------------- procedimento consultar_loja inicio escreval(" Está no consultar loja Tecle Enter") leia ( resp ) fimprocedimento // ----------------- Início do programa ----------------- inicio repita menu escolha( opc ) caso 1 cadastrar_loja caso 2 consultar_loja caso 3 listagem_lojas caso 4 sair outrocaso escreval("Opção Inválida . . . !") fimEscolha ate opc = 4 Fimalgoritmo

@Reinaldo_Lopes você criou uma matriz "m_nome" com 100 linha por cinco colunas , onde os dados armazenados nela serão considerados como caracteres , começando de 1 até 100 e de 1 até 5 , e cadastrou os dados na posição começando de 1 até 4 e na hora de listar os dados , você colocou para escrever o que está na posição zero , que nem existe , até 3 para a de 0 ate contador faca escreval( a,"ª Loja" ) escreval("Código --: ",m_nome: [a,0] ) // não existe essa posiCAo ( 0 , 0 ) escreval("Nome ----: ",m_nome: [a,1] ) // no loop a var "a" vale zero no inIcio escreval("Área ----: ",m_nome: [a,2] ) // e não pode ter dois_pontos aqui escreval("Tipo ----: ",m_nome: [a,3] ) // tabulaCAo organiza dados escreval fimpara pode refazer a matriz "m_nome" para ter o zero , sim ! m_nome : vetor[0..100,0..5] de caractere // matriz de nomes // 100 Linhas // 5 Colunas e alterar também na hora de cadastrar procedimento cadastrar_loja // cadastro de loja inicio escreval(" Está no cadastrar loja") repita escreva ("Código: " ) leia ( m_nome[contador,0] ) escreva ("Nome: " ) leia ( m_nome[contador,1] ) escreva ("Área: " ) leia ( m_nome[contador,2] ) escreval(" 1 - Confecções " ) escreval(" 2 - Alimentação " ) escreval(" 3 - Livros " ) escreval(" 4 - Serviços " ) escreva ("Tipo de 1 a 4 -: " ) leia ( m_nome[contador,3] ) contador := contador + 1 escreva (" Cadastrar outra ? 0 - SIM / 1 - NÃO") leia(resp) ate resp = "1" fimprocedimento

@Junia C Olá , se você Já conseguiu fazer um código para seu programa ? , Poste ele aqui e ajudaremos .

@Eli Almeidaa sim , esse programa pergunta se você quer repetir tudo novamente , e escreve "S/N" que significa "sim" ou "não" , aí você escolhe e digita a resposta , se for "n" ele termina o programa e se for qualquer outra letra ele repete , mas agora percebi que você que mesmo é substituir o comando "enquanto / fimenquanto" pelo "repita / ate" , e seria assim : Algoritmo "impares 2" Var n , i : inteiro Inicio i <- 1 escreva (" Digite um número ") leia( n ) repita se i % 2 = 1 então // esse simbolo % eh igual a esse "mod" escreval( i ) fimse i <- i + 1 ate i > n Fimalgoritmo

@Eli Almeidaa o comando repita/ate , pode ser usado em qualquer parte do programa , e você escolhe o que vai repetir , podendo ser o algoritmo todo ou apenas uma linha dele , e nesse seu código , se você quer repetir para escolher vários números imprimindo os ímpares , vai precisar de mais uma variável para controlar o loop do "repita" , e seu código ficaria assim : Algoritmo "impares" Var n , i : inteiro resp : caractere Inicio repita i <- 1 // inicializar a variAvel pois vai repetir tudo escreval (" Digite um número") leia( n ) enquanto i < n faca se i % 2 = 1 então // esse simbolo % eh igual a esse "mod" escreval(i) // senao fimse i <- i + 1 fimenquanto escreva("outra vez S/N ") leia( resp ) ate resp = "n" Fimalgoritmo