this repo has no description
dekker.one
1%% Variables.
2
3% Reembolso trimestral.
4var float: R;
5
6% Capital prestado inicialmente.
7var float: P;
8
9% Tasa de interés
10var 0.0 .. 10.0: I;
11
12%% Variables intermedias.
13
14% saldo después de un trimestre.
15var float: B1;
16
17% Saldo después de dos trimestres.
18var float: B2;
19
20% Saldo después de tres trimestres.
21var float: B3;
22
23% Saldo adeudado al final.
24var float: B4;
25
26% Restricciones.
27constraint B1 = P * (1.0 + I) - R;
28constraint B2 = B1 * (1.0 + I) - R;
29constraint B3 = B2 * (1.0 + I) - R;
30constraint B4 = B3 * (1.0 + I) - R;
31
32solve satisfy;
33
34% Salida
35output [
36"Préstamo ", show_float(0, 2, P), " al ", show(I*100.0),
37"% interés y reembolso ", show_float(0, 2, R),
38"\npor trimestre para 1 año deja ",
39show_float(0, 2, B4), " debido\n"
40];