Annual, C64 Programme

Commodore 64

ANNUAL.BAS

ANNUAL.PRG

Supposons que vous investissiez 1 000,00 $ dans un investissement qui rapporte dix pourcentage d'intérêt. Combien d'intérêts gagnerez-vous à la fin de un ans?

Généralement, la réponse n'est pas simplement 100,00 $ (le taux d'intérêt multiplié par le principal). Le montant des intérêts gagnés par année dépend de la fréquence à laquelle les intérêts sont composés (calculés) et payés.

Si cela n'est fait qu'une seule fois à la fin de l'année, vous ne gagnez vraiment que dix pour cent. Mais si cela se fait plus souvent (chaque mois, par exemple) vous gagnez plus. En effet, les intérêts après le premier mois commencent également à générer des intérêts.

Ce programme vous montre le rendement annuel de n'importe quel taux d'intérêt pour diverses techniques de composition, en supposant que l'intérêt est ajouté au capital au fur et à mesure qu'il est calculé.

Sachez que certaines institutions d'épargne utilisent des techniques différentes pour calculer un rendement annuel. Leurs chiffres publiés peuvent différer de ceux calculés ici.

COMMENT L'UTILISER

Entrez simplement le taux d'intérêt que vous souhaitez évaluer. Le programme affiche le rendement annuel pour la capitalisation annuelle, semestrielle, trimestrielle, mensuelle, hebdomadaire et quotidienne.

Ensuite, il vous demande un autre taux d'intérêt à évaluer. Si vous n'en avez plus, entrez zéro pour terminer le programme.

En raison de la façon dont les nombres sont représentés à l'intérieur de l'ordinateur, vous remarquerez parfois que le dernier chiffre significatif est inexact.

Heureusement, il est rarement nécessaire de connaître le rendement annuel au-delà de deux ou trois décimales, cela ne devrait donc pas poser de problème.

Les réponses calculées sortent presque instantanément pour la plupart des techniques de composition, mais la composition quotidienne prend un peu plus de temps à calculer (environ 3 ou 4 secondes).

La section Changements faciles ci-dessous montre comment envoyer la sortie à une imprimante, si vous en avez une. Il montre également comment ajouter d'autres techniques de composition au programme.

Le programme demande quel taux d'intérêt doit être évalué. L'opérateur le fournit et le programme affiche le rendement annuel pour six techniques de préparation différentes.

100 REM ANNUAL INTEREST
110 REM copvright 1983
111 REM thm rugg, phil feudmrn, rnd
112 REM WESTERN SYSTEMS GROUP
130 CLR: PRINT CHR$(147)
150 PRINT"** ANNUAL INTEREST **"
160 PRINT
170 INPUT"INTEREST RATE";R
180 PRINT:IF R=0 THEN END
190 PRINT"INTEREST RATE =";R
200 PRINT
210 PRINT"COMPOUNDED";TAB(16);
220 PRINT"ANNUAL YIELD"
230 PRINT"----------";TAB(16);
240 PRINT"------------"
250 RESTORE
260 READ N$,N
270 IF N$="END" THEN 400
280 PRINT N$;TAB(15)
290 T=R/100:W=T/N:S=1
300 FOR J=1 TO N
310 S=S+S*W:NEXT
320 S=(S-1)*100
330 PRINT S
340 GOTO 260
400 PRINT
410 GOTO 170
800 END
900 DATA ANNURLLY,1
910 DATA SEMI-ANNUALLY,2
920 DATA QUARTERLY,4
930 DATA MONTHLY,12
940 DATA WEEKLY,52
950 DATA DAlLY,365
960 DATA END,999

Changements faciles

1. Si vous avez une imprimante, vous pouvez lui envoyer la sortie très facilement.

Ajoutez simplement ces lignes :

185 OPEN 1,4:CMD 1
405 PRINT#1:CLOSE 1

2. L'ajout d'une autre technique de composition se fait en insérant une autre instruction DATA entre les lignes 900-950.

Par exemple, la capitalisation bimensuelle signifierait une fois tous les deux mois, ou six fois par an.

Pour l'inclure, ajoutez cette déclaration :

925 DATA BIMONTHLY,6

3. Le programme peut être modifié pour effectuer des calculs pour toute une série de taux d'intérêt sans s'arrêter. Si vous avez une imprimante, vous pouvez créer vos propres tableaux de référence.

Pour ce faire, par exemple, pour des taux d'intérêt de 10 à 12 % par incréments d'un quart de pour cent, procédez comme suit :

170 FOR R= 10 TO 12 STEP .25
410 NEXT

ROUTINES PRINCIPALES

130 Initialise les variables.
150-160 Affiche le titre.
170-180 Obtient le taux d'intérêt. Termine le programme si zéro.
190-240 Affiche le taux et les en-têtes de colonne.
250-410 Effectue des calculs et affiche le résultat pour chaque technique de composition.
900-960 déclarations DATA pour chaque technique de composition
que.

VARIABLES PRINCIPALES

R Taux d'intérêt fourni par l'opérateur (en pourcentage).
N$ Nom de la technique de composition.
N Nombre de fois par an pour composer.
T Taux d'intérêt (en décimal).
W Taux d'intérêt par période de capitalisation.
S Somme des intérêts gagnés pour l'année.
J Variable de boucle.

PROJETS SUGGÉRÉS

1. Tenez compte de l'inflation et des impôts et indiquez le gain ou la perte "réel" de l'investissement. Par exemple, une personne dans une tranche d'imposition de 50 % au cours d'une année d'inflation de 9 % doit réaliser un rendement annuel d'environ 18 % juste pour atteindre le seuil de rentabilité à la fin de l'année.

2. Modifiez le programme pour afficher (ou imprimer) un tableau des rendements annuels. Affichez une colonne pour chaque technique de composition et une ligne pour chaque taux d'intérêt.

 

 

 

 

 

 

 

Recherche personnalisée