leonardoredaelli 1 Denunciar post Postado Julho 30, 2014 EM VISUALG linguagem PORTUGOL. 1)Faça um algoritmo que copie o conteúdo de um vetor em um segundo vetor 2)Faça um algoritmo que some o conteúdo de dois vetores e armazene resultado em um terceiro vetor 3)Faça um algoritmo que faça a união de dois vetores de mesmo tamanho e mesmo tipo em um terceiro vetor com dobro do tamanho 4)Leia 3 notas e os nomes de 4 alunos. Escreva no final o nome e a média de cada aluno Se a média for maior ou igual a 6 escreva “ Aluno Aprovado”,caso a média for menor que 6, escreva ”Aluno Reprovado”. 5)Escreva um algoritmo que leia dois vetores A e B de tamanho 10 e gere um vetor C e D que contenha: a) Vetor C _ a soma entre A e B; b) Vetor D _ a diferença entre A e B; 6)Escreva um algoritmo que leia um vetor A de tamanho 10 e gere um vetor B e C que contenha: a) Vetor B – recebe todos os pares ; b) Vetor C – recebe todos os impares; c) Imprimir os 3 vetores Compartilhar este post Link para o post Compartilhar em outros sites
Sergio Cavalcante 6 Denunciar post Postado Julho 31, 2014 algoritmo "Ajuda ques 1" // Função : // Autor : Sergio cavalcante // Data : 30/07/2014 // Seção de Declarações var v1:vetor[1..1]de caracter v2:vetor[1..1]de caracter inicio Escreva("Informe um nome: ") leia(v1[1]) v2[1] <-v1[1] Escreva("O nome que esta no segundo vetor é: " ,v2[1]) algoritmo "Ajuda ques 2" // Função : // Autor : Sergio cavalcante // Data : 30/07/2014 // Seção de Declarações var v1:vetor[1..1]de inteiro v2:vetor[1..1]de inteiro v3:vetor[1..1]de inteiro inicio Escreva("Informe um valor para o 1 vetor: ") leia(v1[1]) Escreva("Informe um valor para o 2 vetor: ") leia(v2[1]) v3[1] <- v2[1]+ v1[1] Escreva("A soma do 1º vetor + 2º vetor e : ",v3[1]) Compartilhar este post Link para o post Compartilhar em outros sites
leonardoredaelli 1 Denunciar post Postado Julho 31, 2014 consegue solucionar a questão 6? Compartilhar este post Link para o post Compartilhar em outros sites
William Bruno 1501 Denunciar post Postado Julho 31, 2014 Oi @leonardoredaelli, não adianta postar diversas vezes seguidas ou abrir vários tópicos para a mesma dúvida. Apenas aguarde que alguém te responda. No caso, o intuito do fórum é ajudar, e não que façam o seu dever de casa. Nesse meio tempo, tente ajudar alguém tb. É assim que o fórum funciona. Compartilhar este post Link para o post Compartilhar em outros sites
Sergio Cavalcante 6 Denunciar post Postado Julho 31, 2014 não posso responder tudo ...te mostrei como se faz algumas ,coloque o que você já fez que te ajudaremos Compartilhar este post Link para o post Compartilhar em outros sites
leonardoredaelli 1 Denunciar post Postado Julho 31, 2014 var vet1 : vetor [1..5] de inteiro vet2 : vetor [1..5] de inteiro vet3 : vetor [1..10] de inteiro i : inteiro inicio escreval("Entrada de dados dos vetores") para i de 1 ate 5 faca escreva("Digite o ",i,"º valor do vetor vet1: ") leia(vet1) escreva("Digite o ",i,"º valor do vetor vet2: ") leia(vet2) vet3<-vet1 vet3[i+5]<-vet2 fimpara para i de 1 ate 10 faca escreval("a união dos vetores eh",vet3) fimpara fimalgoritmo var n1: vetor [1..4] de real n2: vetor [1..4] de real n3: vetor [1..4] de real nome:vetor [1..4] de caracter media:vetor [1..4] de real i : inteiro inicio para i de 1 ate 4 faca escreva(" digite nome:") leia(nome) escreva("digite a 1º nota:") leia (n1) escreva("digite a 2º nota:") leia (n2) escreva("digite a 3º nota:") leia (n3) media<-(n1+n2+n3/3) fimpara para i de 1 ate 4 faca se media >= 6 entao escreval("Aluno:", nome ," media:", media , " aprovado") senao escreval("Aluno:", nome ," media:", media , " reprovado") fimse fimpara fimalgoritmo var Vnum : vetor [1..10] de inteiro vet : vetor [1..10] de inteiro i : inteiro soma : inteiro cont : inteiro inicio soma <- 0 // inicializar a soma cont <- 0 // inicializar o cont //entrada de dados no vetor Para i de 1 ate 10 faca Escreva("Digite o ",i,"º valor: ") Leia (vnum) soma <- soma + Vnum cont <- cont + 1 Fimpara escreval("") // fecha o para //saida de dados no vetor Para i de 1 ate 10 faca escreval(i,"º valor:",Vnum) Fimpara escreval("") // fecha o para //impressao da soma escreval("O resultado da soma he.......: ",soma) escreval("A qtde de elementos no vetor he: ",cont) escreval("A qtde de elementos no vetor he: ",vet) fimalgoritmo ar veta : vetor [1..5] de real vetb : vetor [1..5] de real vetc : vetor [1..5] de real vetd : vetor [1..5] de real i :inteiro inicio para i de 1 ate 5 faca escreva(" digite o vetor a:") leia(veta) escreva("digite o vetor b:") leia (vetb) vetc <- veta + vetb vetd<-veta - vetb fimpara para i de 1 ate 5 faca escreval("Soma dos vetores: veta: ",veta," + vetb: ",vetb," eh:",vetc) fimpara para i de 1 ate 5 faca escreval("Soma dos vetores: veta: ",veta," - vetb: ",vetb," eh:",vetc) fimpara fimalgoritmo var a, b: vetor[1..5] de inteiro i:inteiro inicio para i de 1 ate 5 faca leia(a) fimpara para i de 1 ate 5 faca b <- a fimpara para i de 1 ate 5 faca escreval(b) fimpara fimalgoritmo inicio // Seção de Comandos fimalgoritmo Compartilhar este post Link para o post Compartilhar em outros sites
Bruno Carazato 0 Denunciar post Postado Agosto 29, 2014 var vet1 : vetor [1..5] de inteiro vet2 : vetor [1..5] de inteiro vet3 : vetor [1..10] de inteiro i : inteiro inicio escreval("Entrada de dados dos vetores") para i de 1 ate 5 faca escreva("Digite o ",i,"º valor do vetor vet1: ") leia(vet1) escreva("Digite o ",i,"º valor do vetor vet2: ") leia(vet2) vet3<-vet1 vet3[i+5]<-vet2 fimpara para i de 1 ate 10 faca escreval("a união dos vetores eh",vet3) fimpara fimalgoritmo var n1: vetor [1..4] de real n2: vetor [1..4] de real n3: vetor [1..4] de real nome:vetor [1..4] de caracter media:vetor [1..4] de real i : inteiro inicio para i de 1 ate 4 faca escreva(" digite nome:") leia(nome) escreva("digite a 1º nota:") leia (n1) escreva("digite a 2º nota:") leia (n2) escreva("digite a 3º nota:") leia (n3) media<-(n1+n2+n3/3) fimpara para i de 1 ate 4 faca se media >= 6 entao escreval("Aluno:", nome ," media:", media , " aprovado") senao escreval("Aluno:", nome ," media:", media , " reprovado") fimse fimpara fimalgoritmo var Vnum : vetor [1..10] de inteiro vet : vetor [1..10] de inteiro i : inteiro soma : inteiro cont : inteiro inicio soma <- 0 // inicializar a soma cont <- 0 // inicializar o cont //entrada de dados no vetor Para i de 1 ate 10 faca Escreva("Digite o ",i,"º valor: ") Leia (vnum) soma <- soma + Vnum cont <- cont + 1 Fimpara escreval("") // fecha o para //saida de dados no vetor Para i de 1 ate 10 faca escreval(i,"º valor:",Vnum) Fimpara escreval("") // fecha o para //impressao da soma escreval("O resultado da soma he.......: ",soma) escreval("A qtde de elementos no vetor he: ",cont) escreval("A qtde de elementos no vetor he: ",vet) fimalgoritmo ar veta : vetor [1..5] de real vetb : vetor [1..5] de real vetc : vetor [1..5] de real vetd : vetor [1..5] de real i :inteiro inicio para i de 1 ate 5 faca escreva(" digite o vetor a:") leia(veta) escreva("digite o vetor b:") leia (vetb) vetc <- veta + vetb vetd<-veta - vetb fimpara para i de 1 ate 5 faca escreval("Soma dos vetores: veta: ",veta," + vetb: ",vetb," eh:",vetc) fimpara para i de 1 ate 5 faca escreval("Soma dos vetores: veta: ",veta," - vetb: ",vetb," eh:",vetc) fimpara fimalgoritmo var a, b: vetor[1..5] de inteiro i:inteiro inicio para i de 1 ate 5 faca leia(a) fimpara para i de 1 ate 5 faca b <- a fimpara para i de 1 ate 5 faca escreval(b) fimpara fimalgoritmo inicio // Seção de Comandos fimalgoritmo Cara você quer ajuda ou quer a resposta de teus exercicios do curso/faculdade? Se você quiser aprender a gente pode te ajudar, Pense nisso ou nunca será um programador de verdade. Compartilhar este post Link para o post Compartilhar em outros sites
leonardoredaelli 1 Denunciar post Postado Agosto 31, 2014 Então, faça assim: algoritmo "Questão 6"// Função : Vetores// Autor : Leonardo Redaelli// Data : 8/31/2014// Seção de Declaraçõesvarcontpar:inteirocontimpar:inteiroi:inteiroinicio// Seção de Comandoscontpar<-0contimpar<-0para i de 0 ate 10 facaescreval("O total de números Vetor A:",i)fimparapara i de 0 ate 10 facaSe (i mod 2) = 0 entaoescreval("vetor B é par:", i)contpar<-contpar+1senaoescreval("vetor C é impar:", i)contimpar<-contimpar+1fimsefimparaescreval("O total de números pares lidos foi:",contpar)escreval("O total de números ímpares lidos foi:",contimpar)fimalgoritmo Ou também o método enganador: algoritmo "Questão 6 enganadora"// Função : Vetores// Autor : Leonardo Redaelli// Data : 8/31/2014// Seção de Declaraçõesvarvet: vetor[0..10] de inteirovetpar: vetor[0..10] de inteirovetimpar: vetor[0..10] de inteiroi,num: inteirocont_par:inteirocont_impar:inteirocont:inteirosoma:inteiroinicio// Seção de Comandospara i de 0 ate 10 facaescreval("vetor A:", i)Se i mod 2 = 0 entaovetpar <- iescreval("vetor B é par:", i)senaovetimpar <- iescreval("vetor C é impar:", i)fimsefimparapara num de 0 ate 10 faca se num mod 2 = 0 entaocont_par<-cont_par+1senaocont_impar<-cont_impar+1fimsefimpara escreval("O total de números Vetor A:",num-1) escreval("O total de números pares lidos foi:",cont_par)escreval("O total de números ímpares lidos foi:",cont_impar)fimalgoritmo Compartilhar este post Link para o post Compartilhar em outros sites
KhaosDoctor 242 Denunciar post Postado Setembro 1, 2014 Leonardo, fique atento às regras do fórum: http://forum.imasters.com.br/topic/525049-antes-de-postar-nesta-area-por-favor-leia-esta-topico/ Compartilhar este post Link para o post Compartilhar em outros sites
