Question

faça um algorítimo q leia um conjunto de numero x e imprima a sua soma e sua media. admite q o valor 9999 e utilizado para fim de leitura exemplo 123=> soma=6 media =2

Answer 1

algoritmo "semnome" // Função : // Autor : // Data : 29/11/2016 // Seção de Declarações
   var numero,a,b,c,d,j,soma: inteiro
   media: real  
   inicio escreva("Digite o numero: ")
   leia (numero)
   se (numero < 9999) entao   
 se (numero <= 10) entao      
 a<-numero      
 j<-1   
 fimse
      se (numero>10) e (numero <= 100) entao
         a<- numero%10  
     b<- int((numero%100-numero%10)/10)
         j<-2   
 fimse  
  se (numero>100) e  (numero <= 1000)  entao   
    a<- numero%10    
   b<- int((numero%100-numero%10)/10)   
    c<- int((numero-numero%100)/100)     
  j<-3   
fimse   
se (numero>1000) e  (numero < 10000)  entao   
    a<- numero%10      
 b<- int((numero%100-numero%10)/10)  
     c<- int((numero%1000-numero%100)/100)
         d<- int((numero-numero%1000)/1000)  
     j<-4     
 fimse
   fimse
   soma <- a+b+c+d
   media <- (a+b+c+d)/j
   escreval("o valor da soma ", soma)
   escreval("o valor da media ", media)
   fimalgoritmo