41 lines
742 B
MiniZinc
41 lines
742 B
MiniZinc
%% Variables.
|
|
|
|
% Reembolso trimestral.
|
|
var float: R;
|
|
|
|
% Capital prestado inicialmente.
|
|
var float: P;
|
|
|
|
% Tasa de interés
|
|
var 0.0 .. 10.0: I;
|
|
|
|
%% Variables intermedias.
|
|
|
|
% saldo después de un trimestre.
|
|
var float: B1;
|
|
|
|
% Saldo después de dos trimestres.
|
|
var float: B2;
|
|
|
|
% Saldo después de tres trimestres.
|
|
var float: B3;
|
|
|
|
% Saldo adeudado al final.
|
|
var float: B4;
|
|
|
|
% Restricciones.
|
|
constraint B1 = P * (1.0 + I) - R;
|
|
constraint B2 = B1 * (1.0 + I) - R;
|
|
constraint B3 = B2 * (1.0 + I) - R;
|
|
constraint B4 = B3 * (1.0 + I) - R;
|
|
|
|
solve satisfy;
|
|
|
|
% Salida
|
|
output [
|
|
"Préstamo ", show_float(0, 2, P), " al ", show(I*100.0),
|
|
"% interés y reembolso ", show_float(0, 2, R),
|
|
"\npor trimestre para 1 año deja ",
|
|
show_float(0, 2, B4), " debido\n"
|
|
];
|