Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Impresion De La Suma De Numeros
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Impresion De La Suma De Numeros 
 
[align=left]Public Sub Main()
Dim x, z, y As Integer

Print " Dame un numero"
Input x
Repeat
z = x Mod 10
y = y + z
Until z = 0
Print y
End

Se lo que tengo que hacer, pero no se como plantearlo en el codigo.
LO que trato de hacer es que el numero que pida lo divida entre 10 y el residuo lo sume asi con cada una de las cifras del numero que ingrese. Pero no se como ponerlo en el programa, me podrian ayudar, por favor
Gracias
 



 
Chema9879 - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Impresion De La Suma De Numeros 
 
Una pregunta: porqué escribes en esta sección "Sobre Gambas-es" del foro ?  
 



 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Impresion De La Suma De Numeros 
 
Hola.

A bote pronto veo un fallo gordo. Ten en cuenta que la variable "x" nunca cambia dentro del bucle, eso quiere decir que el resto de la división siempre será el mismo y por lo tanto nunca saldrá del bucle.
 Otro problema que veo es la variable "x" que es un string, no un integer. Tendrías que hacer una conversión.

Espero que te sirvan las pistas que te he dado.
Un saludo.
 



 
Guizans - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Impresion En Espera tomas General 0 Jueves, 20 May 2010, 18:08 Ver último mensaje
tomas
No hay nuevos mensajes Impresion En Impresoras Fiscales Fenriz07 General 5 Domingo, 30 Diciembre 2012, 22:53 Ver último mensaje
codificador
No hay nuevos mensajes Impresion De Reportes Con Gambas3 cefcom Aplicaciones/Fragmentos de Código 1 Sabado, 25 Agosto 2012, 19:41 Ver último mensaje
arubioc
No hay nuevos mensajes Impresion En Star Sp500 alessandri Aplicaciones/Fragmentos de Código 4 Sabado, 04 May 2019, 03:28 Ver último mensaje
alessandri
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario