Número de divisores
Hola, disculpen soy nuevo en este club, no se bien como se usa.
Necesito ayuda con un problema en lazarus o delphi que creo que son programas muy similar. Mi problema es: Usando el procedimiento con paso de parámetros, calcular el número de divisores (n) que imprima la cantidad de divisores que tiene el numero entero n. Por ejemplo, si n=16 el programa debe imprimir que tiene 5 divisores (que son 1,2,4,8 y 16). Esperó y me puedan ayudar, por favor. De antemano muchas gracias, saludos. |
Hola, bienvenido, el método básico sería algo como lo siguiente:
Supongamos que no es una app de consola y tienes un TEdit llamado Edit1, entonces en el OnClick de un botón pones...
Ya, eso sería todo. Sin embargo, si quieres usar parallels para lograr esto, se podría hacer algo así: Agregar en el uses las unidades...
Y escribir en aquél botón:
Espero te sirva, saludos. |
Número de divisores
Hola, disculpen soy nuevo en este club
Necesito ayuda con un problema en lazarus Mi problema es: Usando el procedimiento con paso de parámetros, calcular el número de divisores (n) que imprima la cantidad de divisores que tiene el numero entero n. Por ejemplo, si n=16 el programa debe imprimir que tiene 5 divisores (que son 1,2,4,8 y 16). Esperó y me puedan ayudar, por favor. De antemano muchas gracias, saludos. |
Hola,
¿No te sirvió lo que te respondí en el otro hilo que abriste para el mismo tema? http://www.clubdelphi.com/foros/showthread.php?t=91685 Por favor, en el futuro, no repitas hilos ;), te invito a leer la guía de estilo del club http://www.clubdelphi.com/foros/guiaestilo.php |
Lo siento mucho, en verdad no sabía que no se podía hacer eso.
|
Disculpa jhonny, vi la respuesta que le hiciste a mi pregunta en el foro varios
Siguí tus recomendaciones y el código me mostraba varios errores, trate de acomodarlo a lo que poco se, pero no me da e número de divisores sino el mismo numero que yo introduzco. Este es mi código: implementation
Esperó y me puedas seguir ayudando. Gracias y saludos. |
Hola, no te preocupes, lo importante es que ya sabes y lee la guía de estilo para que no suceda...
En cuanto a la duda y siguiendo el camino que tomaste, lo que sucede es que N es el número que ingresas, vCantidad es el número que debes mostrar, así:
Saludos. |
Hola Jhonny, siguiendo tu código me lanza tres errores en la ventana de mensajes los cuales son:
unit1.pas(46,28) Error: Identifier not found "Edit1" unit1.pas(52,9) Error: identifier idents no member "Result" unit1.pas(74, "BEGIN" expected but "end of file" found Me parece que son errores de identificación, pero no se como resolverlo; por favor me podrías decir como resolverlos. De antemano gracias y saludos. |
A ver, pon todo tu código.
|
Hola Casimiri Noveti, este es el código que hice con ayuda de Jhonny:
De antemano gracias por tu ayuda. |
Eso no es TODO tu código, Dinial6222 ;)
Y recuerda poner los tags al código fuente, ejemplo: Gracias :) |
Perdón, este es todo mi código; esta construido en el programa Lazarus
|
Eso pasa porque el procedimiento cantidad_de_divisores esta declarado "fuera" del form. Prueba de este modo:
|
Gracias por tu ayuda [AgustinOrtu].
Ya me da el resultado. Nuevamente gracias, saludos. |
La franja horaria es GMT +2. Ahora son las 10:48:13. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi