VisualG Dificuldade numa questao no Visualg (multiplo de 3) e média

[mzimpel]

escrever um algoritmo que receba vários números inteiros no teclado. E no final imprimir a media dos números múltiplos de 3. para sair digitar zero

[navegantenarede]

@mzimpel compartilha o que você fez até agora para facilitar a ajuda.

 

Uma dica é separar o problema em partes, assim ajuda a identificar uma solução.

[mzimpel]

3 horas atrás, navegantenarede disse:

@mzimpel compartilha o que você fez até agora para facilitar a ajuda.

 

Uma dica é separar o problema em partes, assim ajuda a identificar uma solução.

o que acontece e que nao to sabendo como fazer a media do múltiplo de 3 e e soma dos múltiplos de 3,to bem perdido nessa questão

Var
numero:inteiro
soma:real
media:real
x3:real


// Seção de Declarações das variáveis 


Inicio

escreval("digite um numero")
leia (numero)
enquanto numero <> 0 faca
 soma<-soma+numero

[Rodrigo J Polette]

Neste link diz que um número para ser multiplo de 3, a soma dos dígitos deve ser divisível por 3.

 

Aqui:

Inicio

escreval("digite um numero")
leia (numero)
enquanto numero <> 0 faca
 soma<-soma+numero 

Seria

Inicio

escreval("digite um numero")
leia (numero)
enquanto numero <> 0 faca {
	Se (numero div 3 == 0)
 		soma<=soma+numero 
}

 

[mzimpel]

6 minutos atrás, Rodrigo J Polette disse:

Neste link diz que um número para ser multiplo de 3, a soma dos dígitos deve ser divisível por 3.

 

Aqui:

Inicio

escreval("digite um numero")
leia (numero)
enquanto numero <> 0 faca
 soma<-soma+numero 

Seria

Inicio

escreval("digite um numero")
leia (numero)
enquanto numero <> 0 faca {
	Se (numero div 3 == 0)
 		soma<=soma+numero 
}

 

usei ele mas como faço para ele pega media dos numeros divisiveis por 3 ?

 

[Rodrigo J Polette]

@mzimpel

Além da soma, voce deve armazenar a quantidade de vezes que foi encontrado um número divisível por 3, e antes de mostrar ele, voce divide pela quantidade.

[Simon Viegas]

Olá.

 

Segue um código com ajutes... ficaria mais ou menos assim:

algoritmo "FCdH"
var
   numero:inteiro
   soma  :inteiro
inicio
   numero <- (-1)
   enquanto numero <> 0 faca
      escreval("Digite um numero")
      leia (numero)
      se (numero mod 3 = 0) entao
         soma <- soma+numero
      fimSe
   fimEnquanto
fimAlgoritmo

 

Resumidamente:

- a leitura deve ficar dentro do laço;

- o operador para "resto" seria MOD, em vez de DIV (este último retorna o "quociente");

- pequenos ajustes referente a sintaxe para o VisualG.

 

@mzimpel, faltando seguir a próxima etapa:

3 horas atrás, Rodrigo J Polette disse:

@mzimpel

Além da soma, voce deve armazenar a quantidade de vezes que foi encontrado um número divisível por 3, e antes de mostrar ele, voce divide pela quantidade.