Sacar porciento en Delphi

[hervicen]

Muchas gracias.....

Me sirve de Mucho..
Ademas voy a tener presente todas sus sugerencias..

[[AzidRain]]

Ñuño, sin que tenga que ver gran cosa con resolver el problema de nuestro nuevo amigo, que comes que adivinas, me parece que el clásico "Me sale un error" o "Me marca error" es creo por mucho la frase mas socorrida del usuario final...a quien no le ha tocado. OJO: No estoy atacando a hervicen ni criticando su post, pero me acordé de lo que muchos casos de usuarios.

[Ñuño Martínez]

Tienes razón, AzidRain. Es más: ayer mismo recibí por enésima vez un mensaje de correo de un usuario diciendo que "no funciona". Literalmente. >.<

[hervicen]

ESpero que me tengan Paciencia, pues como les explique estoy nuevesito en esto de programacion en delphi.

he estado intentando resolver un problema de interes compuesto y lo he planteado de esta forma:

Var
Prestamo, Plazo, Interes: Integer;
Cuotas: Real;
begin
Prestamo:=StrtoINt(edit1.Text);
Plazo:=StrtoINt(edit2.Text);
Interes:=StrtoINt(edit3.Text);
Cuotas:=(Prestamo*(1+(Interes/100))^Plazo)/Plazo;
edit4.text:=formatFloat([Cuotas]);
end;

Al correrlo me arroja el siguiente error:

[Error]Unit1.pas(43):Pointer type Required.

Si me pudieran ayudar de favor..!!!!

[Lord Delfos]

Eso es porque el símbolo "^" no es la potencia. Es el símbolo de dereferencia de punteros...

Lo que tendrías que hacer es usar la función Power:

Código Delphi [-]

uses ..., Math, ...;

[...]

Cuotas:= (Prestamo * Power((1+(Interes/100)), Plazo)) / Plazo;

[hervicen]

Utilizando esta sentencias

Var
Prestamo, Plazo, Interes: Integer;
Cuotas: Real;
begin
Prestamo:=StrtoINt(edit1.Text);
Plazo:=StrtoINt(edit2.Text);
Interes:=StrtoINt(edit3.Text);
Cuotas:=(Prestamo * Power(1+(Interes/100)),Plazo)/Plazo;
edit4.text:=formatFloat([Cuotas]);

Me arroja el siguiente error:

[Error]Unit1.pas(43):Undeclared indentifier:'Power'
[Error]Unit1.pas(43):')' expected but ',' found

[Lord Delfos]

Es que hay varios errores...

[1] "Undeclared indentifier:'Power'" se debe a que no agregaste la unidad Math a la cláusula uses. Las funciones, tipos de datos, variables, constantes, etc. están contenidas en unidades. Para poder usarlas tenés que decirle al compilador que incluya dicha unidad. La función Power está declarada en la unidad Math, así que donde dice "uses UnMontónDeCosas" tenés que agregar el Math.

[2] No sé porqué lo puse, pero es FormatFloat('%f', Cuotas). El primer parámetro es el formato que se le va a dar, y el segundo es el número en cuestión.

[3] "')' expected but ',' found". Que espere un paréntesis y encuentre una coma usualmente significa que te está faltando un paréntesis. Concretamente, al principio de la sentencia "Cuotas:= (Prestamo..." tenés un "(" que no coincide con ninguno, es decir que sobra, o que falta el ")" complementario.