Advertenties
Programma:
Programmaregels:
Beschrijving:
A31 LEL A
Startpunt voor het invoeren van coefficienten.
Raz 1.812
Controlegetal voor de lus: lus wordt herhaald van
1 tot en met 12, in stappen van 1.
AES STO 1
Slaat het controlegetal op in de indexvariabele.
Checksum en lengte: 9F76 012,5
Lael LEBEL L
Start de invoerlus.
Lz IMPUTCi»
Vraagt om een waarde voor de variabele die door
1 geadresseerd wordt en slaat deze waarde op.
Laz ISG i
Telt één op bij 2.
Lad ETO L
Gaat terug naar LBL L als 7 kleiner is dan 13, en
begint met de volgende waarde.
Las GTO A
Gaat terug naar LBL A om de waarden te
bekijken.
Checksum en lengte: 8356 007,5
I81 LEBEL I
Deze routine inverteert een 3 x 3 matrix.
Iaz HER D
Berekent de determinant en slaat de waarde op
voor de delingslus, J.
Igz =T0 MW
Ia4 RCL A
IAS RCL= I
I@e RCL C
Ia7 RCLx
az -
Iga STO XH
Berekent E' x determinant AI — CG.
I18 RCL C
I11 RCL= D
I12 RCL A
I1= RCL= F
I14 -
I15 STO Y
Berekent F' x determinant = CD — AF.
Iles RCL E
I17 RCL= 3
I13 RCL A
I13 RCLx H
Iza -
I21 57T0 2
Berekent H' x determinant = BG — AH.
15-14
Wiskundige programma's
Advertenties
