FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Integral definida en delphi
Buenos dias amigos, tengo un problema en delphi que al hacer una función (function) para calcular la integral definida de la siguiente función (y=(x^2)*cos(2x)+3) en un intervalo (a,b) el programa se queda pegado, anexo el código para que lo analicen y me puedan ayudar (separé lo más que pude para ver si el error estaba por ahí pero no logré nada).
Última edición por nlsgarcia fecha: 08-12-2014 a las 20:03:14. Razón: Identación y Sintaxis Delphi |
#2
|
||||
|
||||
guiller130292,
¡Bienvenido al Club Delphi! Te sugiero revisar la Guía de estilo de los foros ¡Gracias por tu cooperación! Saludos, Nelson. |
#3
|
|||
|
|||
No comprendo
Amigo Nelson, realmente no sé con qué motivo me has recomendado la guía de estilos de foro, no sé si es para orientarme en las publicaciones o si cometí algún error, de ser así por favor indícamelo más explícitamente que no lo consigo, gracias.
|
#4
|
||||
|
||||
¿Has leído la guía de estilo?
¿En qué quieres que te ayudemos? |
#5
|
|||
|
|||
Especificación de duda
Mi duda con el código es que realmente no sé dónde está el error. Elaboré una función que según mi criterio debería calcular la integral definida de la función antes especificada en un intervalo introducido por el usuario. El programa compila, pero al pulsar el boton que debe calcular la integral, se queda pegado y no consigo el error en el código y me parece que la lógica está correcta, si por favor alguien puede revisarlo lo agradezco mucho. Gracias por sus respuestas.
|
#6
|
||||
|
||||
¿Pegado?
¿Eso es bloqueado?, seguramente entra en un bucle infinito porque nunca se cumple que:
|
#7
|
|||
|
|||
Probablemente
Lo más probable es que sea de esa manera porque cuando entran en ciclos infinitos es que se quedan pegados los programas, pero en este caso no entiendo porque x1 va aumentando a razón de c y en algun momento debería llegar a b. Gracias por contestar.
|
#8
|
||||
|
||||
guiller130292,
Cita:
Te comento: 1- La guía de estilo se recomienda leer a todos los nuevos ingresos al Club Delphi. 2- En el Msg #1, el código carecía de identación y de delimitadores de código Delphi, entre mejor este expresado el código y descrito el problema mayor sera la probabilidad de obtener una respuesta al requerimiento planteado, dicho código fue Identado y se corrigió la Sintaxis Delphi. 3- El uso de los delimitadores de código Delphi (Sintaxis Delphi) se muestra en la siguiente imagen: Para ello solo debes seleccionar el código Delphi y pulsar el botón señalado en la imagen (Resaltar Sintaxis Delphi). ¡Gracias por tu cooperación! Saludos, Nelson. Última edición por nlsgarcia fecha: 08-12-2014 a las 22:24:31. |
#9
|
||||
|
||||
Cita:
Deberás seguir tu programa paso a paso, con el depurador para ver qué valores va tomando. También puedes escribir el valor de las variables x1 y b, en el bucle, así ves cómo van cambiando de valor y encontrar el problema. Seguramente, es probable, que sea por cuestión de decimales. |
#10
|
||||
|
||||
Hola guiller130292.
No revisé el código en profundidad pero a simple vista, al ser x1 y b variables de tipo Extended (punto flotante), el problema se produce en la línea: El hardware representa los números de punto flotante como fracciónes en base binaria y dado que la grán mayoría de estos no pueden ser representados exáctamente así, solo se trabaja con aproximaciones. Resumiendo: No compares por márgenes absolutos. Si gustas ampliar: The Floating-Point Guide. Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#11
|
|||
|
|||
Redondeado lo dicho por ecfisa: los números tipo real, double, extended, etc son imprecisos y para compararlo lo mejor es acudir a las aproximaciones. En el caso de tu algoritmo yo haría lo siguiente, aunque no es exactamente lo más recomendado:
Espero te sirva. Última edición por orodriguezca fecha: 09-12-2014 a las 04:35:50. |
#12
|
||||
|
||||
guiller130292,
Cita:
Te comento: 1- El problema del código del Msg #1 el cual hace que entre en un loop infinito, esta en la condición de la estructura de control repeat-until : Como fue señalado en el Msg #6, Msg #10 y Msg #11 por variación de decimales en la comparación de números de punto flotante. 2- El código funciona (No entra en un loop infinito) con la siguiente modificación: Revisa esta información: Espero sea útil Nelson. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Impresora Pre-Definida con FR | lbidi | Impresión | 8 | 11-05-2012 14:59:14 |
Como averiguar el charset que tiene definida una Base de Datos Firebird | apicito | Firebird e Interbase | 8 | 15-07-2010 14:01:26 |
¿Packet Sniffer? Cómo saber quien tiene definida un IP Virtual... | Neftali [Germán.Estévez] | Redes | 22 | 14-05-2007 19:30:21 |
Abrir carpeta de una ruta definida | Aprendiendo | Varios | 3 | 01-03-2007 17:41:50 |
|