Pascal/Turbo Pascal - error 200

 
Vista:

error 200

Publicado por yo (5 intervenciones) el 09/06/2008 15:58:58
no se porque me aperece el error 200:division by cero-...AYUDAA


program ejemplo;
uses Colas, Crt; {Suponer que se dispone de una unit que maneja una cola de enteros}
var colaN:tipo_cola;
elem:integer;
begin
writeln ('Ingrese un elemento: ');
readln(elem);
while elem <> 0 do
begin
q_push(colaN,elem);
writeln ('Ingrese un elemento: ');
readln(elem);
end;
writeln('Los elementos de la cola son: ');
q_pop(colaN,elem);
while not q_empty(colaN) do
begin
q_pop(colaN,elem);
writeln (elem);
end;
readkey;
end.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:error 200

Publicado por Diego Romero (996 intervenciones) el 09/06/2008 21:20:55
Lee acá:
http://www.driverop.com.ar/pascal.php#3
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:error 200

Publicado por yo (5 intervenciones) el 09/06/2008 23:33:34
MUCHISIMAS GRACIAS! AHORA CORRE PERFECTO...SALUDOS!.-
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar