Soul1Gamer

@Simon Viegas

algoritmo "Exercício 03"
//Elaborar um programa que efetue a leitura de 20 valores inteiros em uma
//matriz A de duas dimensões com 4 linhas e 5 colunas. Construir uma matriz B
//de uma dimensão para 4 elementos que seja formada pelo somatório dos
//elementos correspondentes de cada linha da matriz A. Construir também uma
//matriz C de uma dimensão para 5 elementos que seja formada pelo somatório
//dos elementos correspondentes de cada coluna da matriz A. Ao final o programa
//deverá apresentar o total do somatório dos elementos da matriz B com o
//somatório dos elementos da matriz C.
var
   a: vetor[1..4, 1..5] de inteiro
   b: vetor[1..4] de inteiro
   c: vetor[1..5] de inteiro
   i, j : inteiro

inicio

   // Preenche a matriz A
   ALEATORIO 1,9
   escreval("Insira os valores da Matriz A")
   para i de 1 ate 4 faca
      para j de 1 ate 5 faca
         escreva ("A[", i:1, ",", j:1, "]: ")
         leia(a[i,j])
      fimPara
   fimPara
   ALEATORIO off

   // Escreve a matriz A na tela para ter uma noção de como ficou
   escreval("")
   escreval("Matriz A")
   para i de 1 ate 4 faca
      para j de 1 ate 5 faca
         escreva (a[i,j]:2)
      fimPara
      escreval("")
   fimPara
   //*** DAQUI PARA CIMA VOCÊ NÃO MEXE!!! ***
  b[1] <- (A[1,1] + A[1,2] + A[1,3] + A[1,4] + A[1,5])
  b[2] <- (A[2,1] + A[2,2] + A[2,3] + A[2,4] + A[2,5])
  b[3] <- (A[3,1] + A[3,2] + A[3,3] + A[3,4] + A[3,5])
  b[4] <- (A[4,1] + A[4,2] + A[4,3] + A[4,4] + A[4,5])
  escreval("")
   escreval("Matriz B")
   para i de 1 ate 4 faca
         escreva (b[i,j]:2)
      escreval("")
   fimPara
   //*** AQUI ABAIXO VOCÊ VAI "CONTRUIR" A MATRIZ B
   //Na posição 1 do vetor B, você vai colocar a soma da linha 1 do vetor A
   //Na posição 2 do vetor B, você vai colocar a soma da linha 2 do vetor A
   //Na posição 3 do vetor B, você vai colocar a soma da linha 3 do vetor A
   //Na posição 4 do vetor B, você vai colocar a soma da linha 4 do vetor A





   //PARA A MATRIZ C, POR ENQUANTO ESQUEÇA-O. APENAS SE PREOCUPE COM A MATRIZ B





fimAlgoritmo

algoritmo "semnome"

tipo
   agenda = registro
      nome : caractere
      endereco : caractere
      telefone : inteiro
   fimregistro

var
   informacao : vetor [1..2] de agenda
   i,j : inteiro
   pesquisa : caractere
   LIMITE : LOGICO

inicio
   para i de 1 ate 2 faca
      escreva ("Digite o nome: ")
      leia (informacao[i].nome)
      escreva ("Digite o endereço ")
      leia (informacao[i].endereco)
      escreva ("Digite o telefone ")
      leia (informacao[i].telefone)
      limpatela
   fimpara
   escreval ("REGISTROS")
   escreva (-----------)
   escreval ("")
   para i de 1 ate 2 faca
      escreval ("NOME:",informacao[i].nome)
      escreval ("ENDERECO:",informacao[i].endereco)
      escreval ("TELEFONE:",informacao[i].telefone)
      escreval("")
      escreva ()
   fimpara
   escreva ("DIGITE QUAL NOME DESEJA PESQUISAR: ")
   leia (pesquisa)
   escreva ("")
   se (pesquisa = informacao[i].nome) entao
      escreval ("NOME: ",informacao[i].nome)
      escreval ("TELEFONE: ",informacao[i].telefone)
      escreval ("ENDERECO: ",informacao[i].endereco)
   senao
      escreva ("NOME NÃO ENCONTRADO!")'
   fimse
fimalgoritmo

ESTOU RESOLVENDO ESSE EXERCÍCIO:

a) Cadastrar os 10 registros.
b) Pesquisar um dos 10 registros de cada vez pelo campo nome (usar o método seqüencial).
c) Classificar por ordem de nome os registros cadastrados.
d) Apresentar todos os registros.

OBS: O PROBLEMA ESTÁ EM NA HORA DE PESQUISAR, UMA HORA ACHA O NOME E OUTRA HORA NÃO ACHA.

Dessa maneira???

algoritmo "Exercício 03"
//Elaborar um programa que efetue a leitura de 20 valores inteiros em uma
//matriz A de duas dimensões com 4 linhas e 5 colunas. Construir uma matriz B
//de uma dimensão para 4 elementos que seja formada pelo somatório dos
//elementos correspondentes de cada linha da matriz A. Construir também uma
//matriz C de uma dimensão para 5 elementos que seja formada pelo somatório
//dos elementos correspondentes de cada coluna da matriz A. Ao final o programa
//deverá apresentar o total do somatório dos elementos da matriz B com o
//somatório dos elementos da matriz C.
var
   a: vetor[1..4, 1..5] de inteiro
   b: vetor[1..4] de inteiro
   c: vetor[1..5] de inteiro
   i, j : inteiro

inicio
   para j de 1 ate 4 faca
      escreva ("A[", i:1, ",", j:1, "]: ")
      leia (a[j])
      b[j] <- b[j] + a[j]
   fimpara
   para i de 1 ate 4 faca
      escreva ("A[", i:1, ",", j:1, "]: ")
      leia(a[i])
      c[i] <-c[i] + a[i]
   fimPara
   escreval("")
   escreval("Matriz A")

    escreva (a[i,j])
         escreval ("a soma dos elementos da linha A eh: ",b[j])
         escreval ("a soma dos elementos da coluna A EH ",C[I])
   escreval("")

gostaria que alguém me desse dicas na resolução desse programa. já fiz alguma coisa, porrém estou com dificuldade para resolver o resto!

É ESSE EXERCÍCIO: Elaborar um programa que efetue a leitura de 20 valores inteiros em uma matriz A de duas
dimensões com 4 linhas e 5 colunas. Construir uma matriz B de uma dimensão para 4 elementos
que seja formada pelo somatório dos elementos correspondentes de cada linha da matriz A.
Construir tam’bem uma matriz C de uma dimensão para 5 elementos que seja formada pelo
somatório dos elementos correspondentes de cada coluna da matriz A. Ao final o programa deverá
apresentar o total do somatório dos elementos da matriz B com o somatório dos elementos da
matriz C.

algoritmo "semnome"
var
   a: vetor [1..4, 1..5] de inteiro
   b: vetor [1..2, 1..2] de inteiro
   l,c : inteiro
inicio
   para l de 1 ate 4 faca
      para c de 1 ate 5 faca
         escreva ("digite o valor: ")
         leia (a[l,c])
         b[1,1]  <- a[l,c]
         b[1,2]  <- a[l,c]
         b[2,1]  <- a[l,c]
         b[2,2]  <- a[l,c]
      fimpara
   fimpara
   para l de 1 ate 2 faca
      para c de 1 ate 2 faca
         escreval (b[l,c])
      fimpara
   fimpara
fimalgoritmo

@Simon Viegas peço desculpa, eu não sabia que não podia...

@devair1010

algoritmo "semnome"
// função :
// autor :
// data : 16/06/2020
// seção de declarações
var
   a: vetor [1..12] de inteiro
   b: vetor [1..12] de inteiro
   c: vetor [1..24] de inteiro
   i: inteiro
inicio
   para i de 1 ate 12 passo 1 faca
      escreva ("digite o",i,"° valor: ")
      leia (a[i])
      se (a[i] mod 2=0) ou (a[i] mod 3=0) entao
         c[i] <- a[i]
      fimse
   fimpara
   para i de 1 ate 12 passo 1 faca
      escreva ("digite o",i,"° valor: ")
      leia (b[i])
      se (b[i] <> 5) entao
         c[i+12] <- b[i]
      fimse
   fimpara
   para i de 1 ate 24 passo 1 faca
      escreval ("os valores lidos de ",i,"° são:",c[i])
   fimpara
   // seção de comandos
fimalgoritmo

acho que de pano geralmente tem algum atrito. tem um aqui em casa e ele desliza + ou -.

ALGUÉM PODERIA ME AJUDAR NESSE EXERCÍCIO DE CÓDIGO VISUALG?

Ler duas matrizes A e B de uma dimensão com 12 elementos. A matriz A deverá aceitar
apenas a entrada de valores que sejam divisíveis por 2 ou 3, enquanto a matriz B deverá
aceitar apenas a entrada de valores que não sejam múltiplos de 5. A entrada das matrizes
deverá ser validada pelo programa e não pelo usuário. Construir uma matriz C de forma que
a matriz C seja a junção das matrizes A e B, e de forma que a matriz C contenha 24
elementos. Apresentar a matriz C.

@devair1010, puts mano!!! O seu funcionou legal!!! Muito obrigado pela orientação e ajuda!! Eu não entendi foi esses negócios de "i:3", talvez por isso que eu não estava obtendo sucesso no código. Mas mesmo assim agradeço muito!

algoritmo "vetores2"
var
  a: vetor [1..20] de inteiro
  b: vetor [1..30] de inteiro
  c: vetor [1..50] de inteiro
  i: inteiro
inicio
  para i de 1 ate 20 faca
    escreva("digite o",i,"o. valor: ")
    leia (a[i])
    c[i] <-a[i]
  fimpara
  para i de 1 ate 30 faca
    escreva("digite o",i,"o. valor: ")
    leia (b[i])
    c[i+20] <-b[i]
  fimpara
  escreval
  escreval("    o vetor c")
  para i de 1 ate 50 faca
    escreval("o",i:3," valor eh ",c[i]:3)
  fimpara
fimalgoritmo

@devair1010

agora no final pede  "]"  mas não encontro onde colocar

algoritmo "semnome"
var
a: vetor [1..20] de inteiro
b: vetor [1..30] de inteiro
c: vetor [1..50] de inteiro
i: inteiro
inicio
para i de 1 ate 20 faca
escreva ("digite o",i,"o. valor: ")
leia (a[i])
c[i] <-a[i]
fimpara
limpatela
para i de 1 ate 30 faca
escreva ("digite o",i,"o. valor: ")
leia (b[i])
c[i+20] <-b[i]
fimpara
escreval("    o vetor c")
para i de 1 ate 50 faca
escreval ("o",i:3," valor eh ",(c[i]:3))
fimpara

fimalgoritmo

@devair1010, olha ae! mesmo assim está dando problema...

algoritmo "semnome"
var
   a: vetor [1..20] de inteiro
   b: vetor [1..30] de inteiro
   c: vetor [1..50] de inteiro
   i: inteiro
inicio
   para i de 1 ate 20 faca
      escreva ("digite o",i,"o. valor: ")
      leia (a[i])
      c[i] <-b[i+20]
   fimpara
   para i de 1 ate 30 faca
      escreval ("digite o",i,"o. valor: ")
      leia (b[i])
      c[i] <-b[i]
   fimpara
   escreval ("os numeros lidos são ")
   para i de 1 ate 50 faca
      escreval ("o",i," valor eh ",(c[i]:3)
   fimpara

fimalgoritmo

@devair1010  entao, eu estou fazendo de uma forma diferente, como: eu coloco pra ler e armazenar no vetor "a" de 1 a 20 porém fica procurando valor em vetor[0] sendo que disse que era de 1 a 20.

fica difícil nao sei o que fazer...

algoritmo "semnome"
var
A: VETOR [1..20] DE INTEIRO
B: VETOR [1..30] DE INTEIRO
C: VETOR [1..50] DE INTEIRO
I: INTEIRO
inicio
PARA I DE 1 ATE 20 FACA
ESCREVA ("DIGITE O",I,"o. VALOR: ")
LEIA (A[I])
C[I] <- A[I]
FIMPARA
PARA I DE 1 ATE 30 FACA
ESCREVAL ("DIGITE O",I,"o. VALOR: ")
LEIA (B[I])
C[I] <-B[I]
FIMPARA
PARA I DE 1 ATE 50 FACA
ESCREVAL ("OS NUMEROS LIDOS SÃO ",C[I])
FIMPARA

fimalgoritmo

ler duas matrizes do tipo vetor, sendo a com 20 elementos e b com 30 elementos. construir uma
matriz c, sendo esta a junção das duas outras matrizes. desta forma, c deverá ter a capacidade de
armazenar 50 elementos. apresentar a matriz c.

meu algoritmo está com algum problema e não consigo resolver fiquei dias tentando e nada e ainda tenho mais para resolver.

algoritmo "semnome"
// função :
// autor :
// data : 14/06/2020
// seção de declarações
var
a : vetor [1..5] de inteiro
b : vetor [1..5] de inteiro
c : vetor [1..10] de inteiro
i : inteiro
inicio
para i <-1 ate 5 faca
escreva ("digite o ",i,"o. valor:")
leia (a)
c <- (a)
fimpara
para i <-1 ate 5 faca
escreva ("digite o ",i,"o. valor:")
leia (b)
c <- (b)
fimpara
para i de 1 ate 10 faca
escreval ("digite o ",i,"o. valor:",c)
fimpara
fimalgoritmo