Forside Fora Privatøkonomi Hjælp til udregning!!! Hjælp til udregning!!!

#112238
Anonym

Her et renteberegningsprogram, jeg i sin tid – for vel 15-20 år siden – lavede i Basic til min Commodore 128:

10 LPRINT “Hvor mange måneder skal der betales på et lån?”
20 LPRINT “- og hvad skal der betales i alt?”
40 LPRINT
50 INPUT “Betaling pr. md.”;X
60 LPRINT
70 INPUT “Lånebeløb”;Z
80 LPRINT
90 INPUT “Rente pr. md.”;Y
100 Y=Y/100+1:A=X:B=Z:N=0
110 B=B*Y:B=B-A:N=N+1
120 IF B>0 THEN GOTO 110
130 LPRINT
140 LPRINT N;” indbetalinger”
150 LPRINT
160 LPRINT “Sidste indbetaling er kr. “A+B
170 W=(N-1)*X+(A+
180 LPRINT
190 LPRINT”I alt at betale”;W
200 END

Simpelt, men effektivt. Med det kunne man se måned for måned, hvor langt man var kommet med afviklingen af lånet! Betalte renter og restgæld.

Og med en lille smule ændring i programmeringen kunne man også se hvordan en opsparing udviklede sig med renters rente måned for måned. (Efter tre måneder, efter seks måneder osv.)

Men hvor finder man den slags Basic til dagens computere? Det var ellers standard på ‘stenalder’-pc’erne i slutningen af 1980’erne, hvor man bare skulle skrive ‘basic’ – og så havde man programmeringsværktøjet present. Også på IBM-alike pc’ere.

Hvis nogen kender til dette værktøj på nutidens pc’ere, så ville jeg med glæde høre om det.

Mvh – Jerrt