contestada

Un numero de 6 cifras empieza en la cifra 1, si esta cifra se ubicara al final, el nuevo numero seria el tripe del original, Tengo que hallar la suma de las cifras del numero.

Respuesta :

Un número de 6 cifras empieza en la cifra 1

1abcde

Si esta cifra se ubicara al final

abcde1

Sería el triple del original.

3*(1abcde)=abcde1 

 3*(1abcde)=abcde1

 

Es decir:

 

 3*(105 + a104 + b103 + c102 + d10 + e) =  a105 + b104 + c103 + d102 + e10 + 1 

 Acomodamos los términos para factorizar: 

 3*105 – 1 =  a (105 – 3*104) + b (104 – 3*103) + c (103 – 3*102) + d (102 – 3*10) + e (10 –3)

= 7 (a104 + b103 + c102 + d10 + e)

= 7(abcde) 

 Es decir: 

 3*105 – 1 = 2999999 = 7 (abcde) 

 El 7 pasa dividiendo 

 2999999/7 = 428571.28 = abcde 

Tomamos todas las cifras antes del punto decimal 

a + b + c + d + e + 1 = 4 + 2 + 8 + 5 + 7 + 1 = 27

Listo

Algoritmo en pseint para encontrar la suma de las cifras de un número de 6 dígitos que termina en 1 y es el triple de otro que empieza en luno (1) . Un ejemplo son los números 100.007 y 300.021 (suma de cifras =  6). Se adjunta imagen de salida en pantalla del programa y diagrama de flujo.

Algoritmo sumaDeLas6cifrasDelNumero

  • // Definir e inicializar variables

Definir NuevoNum,numOrig,suma Como Real

Definir continuar,NuevoNumEnC,numOrigEnC,cifra2,cifra,digito Como Caracter

continuar <- 's'

  • // Un entero de 6 cifras empieza desde 100 mil hasta 999 mil 999

NuevoNum <- 100000

numOrig <- 0

suma <- 0

  • // Buscar el primer número que cumpla con las condiciones y sumar sus cifras

Repetir

 NuevoNum <- NuevoNum+1

 NuevoNumEnC <- ConvertirATexto(NuevoNum)

  •  // Validar que el nuevo número termine en 1

 cifra <- SUBCADENA(NuevoNumEnC,6,6)

 Si cifra='1' Entonces

  •   // Validar que el número original sea el triple de nuevo numero

  numOrig <- NuevoNum/3

  •   // Validar que el número original sea de 6 cifras

  numOrigEnC <- ConvertirATexto(numOrig)

  Si Longitud(numOrigEnC)=6 Entonces

  •    // Identificar última cifra del nuevo número

   cifra2 <- SUBCADENA(NuevoNumEnC,6,6)

  •    // Validar que el nuevo número termine en la cifra 1

   Si cifra2='1' Entonces

  •     // Imprimir los números en pantalla en pantalla

    Escribir 'Número original (6 cifras que empieza en 1): ',numOrig

    Escribir 'Nuevo número (triple del original, 6 cifras que termina en 1): ',NuevoNum

    Para a<-0 Hasta 6 Hacer

     digito <- SUBCADENA(NuevoNumEnC,a,a)

     suma <- suma+ConvertirANumero(digito)

    FinPara

  •     // Imprimir las suma de las cifras del nuevo número y salir

    Escribir 'Suma de las cifras del nuevo número es: ',suma

    continuar <- 'n'

   FinSi

  FinSi

 FinSi

Hasta Que continuar=='n'

FinAlgoritmo

Para saber más acerca de Algoritmo de problemas matemáticos consulte: https://brainly.lat/tarea/2166220

#SPJ2

megatokay