Fallo de campilacion
Publicado por Ginkoss (7 intervenciones) el 21/01/2015 17:54:17
Buenas, me encuentro escribiendo un subprograma sencillo, pero no consigo averiguar que hago mal. Tengo pascal un poco oxidado y no entiendo porque me falla. Aqui el codigo:
El error en compilacion se produce en la parte señalada. el codigo de error que me devuelve es:" Variable identifier expected"
¿Alguien me puede echar una mano?
Gracias :)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
program prog;
VAR
base,numero:integer;
function logEntero(var n,b:integer):integer;
begin
if n<b thenlogEntero:=0
else
logEntero:=1+logEntero(n DIV b,b);
end;
begin
writeln ('Introduca "b" y "n" para calcular la parte entera');
writeln ('del logaritmo en base "b" de "n"');
read(base,numero);
writeln('Resultado: ',logEntero(numero,base));
end.El error en compilacion se produce en la parte señalada. el codigo de error que me devuelve es:" Variable identifier expected"
¿Alguien me puede echar una mano?
Gracias :)
Valora esta pregunta
0
