¿Cómo calcular resto division de divisor de 16 cifras?

[jmforjeda]

disculpa, que error mas grande, ya me he habia leido la guia de estilo, y he mejorado en cosas pero, he cometido este error que me comentas.
bueno.... el caso es que sigo teniendo el mismo problema, y tengo que solucionarlo ya, porque es para el trabajo.

un Saludo

[Neftali [Germán.Estévez]]

Imagino que quien te ha requerido este problema, te ha puesto ese "número tan grande" justo para que no lo hagas utilizando el operador de la división, sino para que lo hagas paso a paso utilizando un algoritmo.

Se trata de programar un bucle que haga la división tal y como la hacemos manualmente.
Creo que en mi primer curso de facultad, fue una de las prácticas que tuve que hacer.

Deberás utilizar un bucle (for..begin..end o While..begin..end) para recorrer el dividendo. Ves cogiendo cifras (como lo hacemos manualmente), divide y quédate con el resto. Añade una nueva cifra, vuelve a dividir,... y así hasta finalizar. Lo dicho, igual que como se hace manualmente.

Inténtalo, por el código que vas probando y si no te funciona te iremos echando un cable.

[Casimiro Notevi]

Empezado por jmforjeda

disculpa, que error mas grande, ya me he habia leido la guia de estilo, y he mejorado en cosas pero, he cometido este error que me comentas.

Estas cosas pasan al principio

En cuanto a tu problema, tendrás que ayudarnos a ayudarte, no nos has dicho nada más ni has contestado a mi pregunta.
Yo no veo delphi 3 desde ¿1998? pero puede que tengas que incluir en el uses math, o algo así, no puedo recordar después de tantos años.

[Casimiro Notevi]

Empezado por jmforjeda

y tengo que solucionarlo ya, porque es para el trabajo.

jejeje... ¿y eso cómo es?

[jmforjeda]

ja ja si y ademas soy nuevo en el trabajo imaginate como estoy.
he probado el uses math, pero no va, parece que esa en systems y por tanto no es necesario añadirlo, pero eso es con delphi6 porque el delphi3 no lo reconoce.

esto de el bucle tengo que mirarlo, pero si algien lo tiene echo asi o de otra manera que me lopase please

[Casimiro Notevi]

No contestas a nuestras preguntas, no pones nada de tu código, no aportas nada... solo pides código para copiar y pegar.

[Casimiro Notevi]

Ni siquieras usas las búsquedas

[jmforjeda]

utilizar tipos double

la alternativa a la funcion MOD es:

resto=dividendo-(divisor*parte entera resultado division)
para obtener la parte entera utilizar:

formatfloat('#######.##', float)

para pasar a string

luego
posstr para obtener posicion del punto de decimales

lugo copy para obtener parte entera como string

y finalmente floattostr para pasar a double

entonces ya se puede utilizar la fórmula para calcular el resto.

un Saludo

[Casimiro Notevi]

Para nada, eso no te resuelve el problema de un número con 16 dígitos.