Programación General > Pascal

 no me corre!!

(1/2) > >>

gabrielaaA:
hola necesito que me ayuden con este programa cuando le doy en run dice rumtime error  105 at 00001:0073. que significa eso???
program potencia;
var
 B,E,I:integer;
 P:real;
begin
 writeln('introduzca Base');
 readln(b);
 writeln('introduzca Exponente');
 readln(e);
 if (e>=0) then
begin
 P:=1;
for i:=1 to e do
 p:=p*b;
 writeln('la potencia positiva es ',p:0:0);
end.

DriverOp:
Aparte de que te falta el end; del begin del if, no veo ningún problema. El error que te indica no parece tener nada que ver con este programa (Error 105: archivo no abierto para escritura?).

gabrielaaA:
porfa ayudame a corregirlo o algo parecido!! es que lo necesito urgente por favor!!

DriverOp:

--- Cita de: "gabrielaaA" ---porfa ayudame a corregirlo o algo parecido!! es que lo necesito urgente por favor!!
--- Fin de la cita ---
Pues ayúdame a ayudarte, por ejemplo diciendo qué compilador usas y si ya has corregido el error que te señalé.

epayan:
coregido, añadiendo lo que DriverOp menciona , no veo problema


--- Código: Pascal --- program potencia;uses crt;varB,E,I:integer;P:real;Begin     writeln('introduzca Base');     readln(b);     writeln('introduzca Exponente');     readln(e);     if (e>=0) then          Begin               P:=1;               For i:=1 to e do                    Begin                          p:=p*b;                    End;         End;     writeln('la potencia positiva es ',p:0:0);     readkey;End.  

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

Ir a la versión completa