SoloCodigo

Programación General => Pascal => Mensaje iniciado por: delfros en Miércoles 6 de Junio de 2007, 15:48

Título: Runtime
Publicado por: delfros en Miércoles 6 de Junio de 2007, 15:48
Buenas resulta que estoy haciendo un programa, el mismo se compila perfectamente pero a la hora de correrlo me genera un error 200'

He leido que es un problema del pascal al ejecutarse en pc nuevas, tambien vi que existe la forma de corregir este problema, bajando un archivo y sustituyendolo por el que tenia la pc.

He hecho todo esto y aun se continua generando este error, agradeceria que me explicaran detalladamente como se corrigiria.

A continuacion anexo mi programa, no vaya a ser q sea un error de programacion
--------------------------------------
program aprox;
uses crt;

const
e= 2.718;
f= 0.0009;

var

a,b,c:real;
cont: integer;

Begin

cont:=1;

Repeat

b:= (0.5*cont)+(1/cont);
cont:= cont + 1;
c:= b-a;

until ((c>0) and (c<=f))

end.

--------------------------------
delta
Título: Re: Runtime
Publicado por: Enko en Jueves 7 de Junio de 2007, 00:17
Citar
c:= b-a;
Nunca inicializas a la variable "a".  La verdad que eso conduce algunas veces a bugs. No se si es eso.

Por sierto, ¿Cual es el mensaje del error? Division by 0?
Título: Re: Runtime
Publicado por: delfros en Viernes 8 de Junio de 2007, 02:58
si el error es division por cero:S pero instalo los famosos parches esos q existen pero continua diciendo division entre cero:S
Título: Re: Runtime
Publicado por: Enko en Viernes 8 de Junio de 2007, 23:00
Cita de: "delfros"
si el error es division por cero:S pero instalo los famosos parches esos q existen pero continua diciendo division entre cero:S
Citar
Nunca inicializas a la variable "a". La verdad que eso conduce algunas veces a bugs. No se si es eso.
Si el problema es con la Unidad CRT simplemente sacala.
Código: Text
  1.  
  2. program aprox;
  3. const
  4.    e = 2.718;
  5.    f = 0.0009;
  6. var
  7.    a,b,c,r_cont:real;
  8.    cont: integer;
  9. begin
  10.   cont:=1;
  11.   repeat
  12.      b:= (0.5*cont)+(1/cont);
  13.      cont:= cont + 1;
  14.      c:= b-a;
  15.   until ((c&#62;0) and (c&#60;=f))
  16. end.
  17.  
  18.  

Si eso te tira el error, el problema está con 1/cont que se pasa del limite de precision permitido.
Puedes probar cambiar el tipo de datos REAL por DOUBLE, es decdir doble precision.
Título: Re: Runtime
Publicado por: My_Self en Jueves 21 de Junio de 2007, 02:17
no, yo se porque te tira el error 200 (division by 0) o por lo menos creo saberlo ya que a mi me pasa lo mismo cuando pongo  "uses crt"

estoy casi seguro que es por eso

lamentablemente no se como resolver esto.

Lo extraño es que, yo escribo esto en la computadora de mi escuela (no es de las mejores xD) y nunca me dice nada, pero cuando lo pongo en mi casa (mi computadora tampoco es de las mejores: 733mhz xD) me tira el error 200

yo no instale el dichoso parche para computadoras con procesadores superiores a 233mhz. Quisiera saber si instalandolo se arregla y si es asi que me digan por favor donde conseguirlo. De no arreglarse de esta forma, estaria bueno que me digan como  :D
Título: Re: Runtime
Publicado por: Enko en Jueves 21 de Junio de 2007, 14:35
Si usas el buscador del foro encontraras multitudes de links. (busca crtz si quieres)
Por sierto que en la seccion de compiladores que esta en "Preguntas Frecuentes" de la seccion, hay una version de TurboPascal que ya viene con el parche si mal no recuerdo.
Título: Re: Runtime
Publicado por: My_Self en Jueves 21 de Junio de 2007, 17:42
por favor no me trates de ignorante por ser nuevo en el foro, ya habia visitado la seccion de preguntas frecuentes antes de hacer mi consulta.

mi pregunta fue como resolver el problema de no poder usar la unidad crt.


no me interesa el parche ya que veo que alguien arriba dijo que lo instalo y no le resolvio nada
Título: Re: Runtime
Publicado por: Enko en Jueves 21 de Junio de 2007, 21:34
Hola, en ningun momento te traté de ignorante :S
Por sierto, Bienvenido al Foro!!!!.
Citar
no me interesa el parche ya que veo que alguien arriba dijo que lo instalo y no le resolvio nada

No creo que sea verdad, o habrá instalado otra cosa o lo hizo mal.
Como ya dije antes, en la seccion de FAQ, el ZIP de turbo pascal ya viene con el parche.
Deberías aprender a no hacer caso a cualquier opinion en un foro ya que muchas pueden ser errones. De lo contrario, lo de ignorancia se tornaria dudoso.

LO UNICO QUE DEBES HACER ES BAJAR:
http://www.zdima-iv.nm.ru/download/tp7.zip (http://www.zdima-iv.nm.ru/download/tp7.zip)
y a lo sumo, configurar luego los directorios.

Citar
mi pregunta fue como resolver el problema de no poder usar la unidad crt.
A) No usando la unidad CRT
B.) Usando una unidad CRT con el parche. (el link que te pase, ya la tiene con el parche)
Saludos.

PD: recien lo bajé, lo probé en una Athlon XP 2400  y anduvo.
Título: Re: Runtime
Publicado por: My_Self en Viernes 22 de Junio de 2007, 23:59
aveces si tengo ganas de usar la crt como por ejemplo para limpiar la pantalla con el clrscr


en fin, me baje el Zip que me pasaste, descomprimi, reemplace y funciono !!!!

tenias razon en cuanto a no hacer caso a cualquier opinion del foro, ese parche funciona perfecto

bueno muchas gracias
Título: Re: Runtime
Publicado por: Enko en Sábado 23 de Junio de 2007, 21:24
Ahora un problema menos  :P

Cualquier inconveniente no dudes en preguntar.
Saludos.