00000000: 01 08 25 08 0A 00 8F 20 2A 2A 2A 2A 2A 20 50 52 |..%.... ***** PR|
00000010: 4F 47 52 41 4D 20 50 4F 4C 59 4E 4F 4D 45 4E 20 |OGRAM POLYNOMEN |
00000020: 2A 2A 2A 2A 2A 00 49 08 14 00 8F 20 50 4F 4C 59 |*****.I.... POLY|
00000030: 4E 4F 4F 4D 20 49 4E 54 45 52 50 4F 4C 41 54 49 |NOOM INTERPOLATI|
00000040: 45 20 56 4F 4C 47 45 4E 53 00 6A 08 1E 00 8F 20 |E VOLGENS.j.... |
00000050: 44 45 20 4D 45 54 48 4F 44 45 20 56 41 4E 20 44 |DE METHODE VAN D|
00000060: 45 20 4B 4C 45 49 4E 53 54 45 00 90 08 28 00 8F |E KLEINSTE...(..|
00000070: 20 4B 57 41 44 52 41 54 45 4E 2E 20 4D 41 58 49 | KWADRATEN. MAXI|
00000080: 4D 41 41 4C 20 31 30 30 20 50 55 4E 54 45 4E 2E |MAAL 100 PUNTEN.|
00000090: 00 B6 08 32 00 8F 20 44 41 54 41 2D 49 4E 56 4F |...2.. DATA-INVO|
000000A0: 45 52 20 41 46 53 4C 55 49 54 45 4E 20 4D 45 54 |ER AFSLUITEN MET|
000000B0: 20 39 39 2C 39 39 00 CE 08 34 00 97 20 35 33 32 | 99,99...4.. 532|
000000C0: 38 30 2C 30 3A 97 20 35 33 32 38 31 2C 30 00 ED |80,0:. 53281,0..|
000000D0: 08 36 00 99 22 93 12 20 50 52 4F 47 52 41 4D 20 |.6..".. PROGRAM |
000000E0: 50 4F 4C 59 4E 4F 4D 45 4E 20 92 11 22 00 10 09 |POLYNOMEN .."...|
000000F0: 38 00 86 20 58 28 31 30 30 29 2C 59 28 31 30 30 |8.. X(100),Y(100|
00000100: 29 2C 41 28 31 30 2C 31 30 29 2C 43 28 32 30 29 |),A(10,10),C(20)|
00000110: 00 22 09 3A 00 86 20 42 28 32 30 29 2C 44 28 32 |.".:.. B(20),D(2|
00000120: 30 29 00 32 09 64 00 81 20 49 B2 31 20 A4 20 31 |0).2.d.. I.1 . 1|
00000130: 30 30 00 49 09 6E 00 85 20 22 58 2C 59 20 22 3B |00.I.n.. "X,Y ";|
00000140: 58 28 49 29 2C 59 28 49 29 00 6F 09 78 00 8B 20 |X(I),Y(I).o.x.. |
00000150: 58 28 49 29 B2 39 39 20 AF 20 59 28 49 29 B2 39 |X(I).99 . Y(I).9|
00000160: 39 20 A7 20 53 B2 49 AB 31 3A 49 B2 31 30 30 00 |9 . S.I.1:I.100.|
00000170: 77 09 82 00 82 20 49 00 94 09 8C 00 85 22 11 4F |w.... I......".O|
00000180: 52 44 45 20 22 3B 4E 3A 4E B2 B5 28 4E 29 3A 46 |RDE ";N:N..(N):F|
00000190: B2 4E AA 4E 00 B0 09 91 00 8B 20 4E B1 39 20 B0 |.N.N...... N.9 .|
000001A0: 20 4E B1 B2 53 20 B0 20 4E B3 31 A7 20 31 34 30 | N..S . N.1. 140|
000001B0: 00 D7 09 95 00 8F 20 56 55 4C 20 4D 41 54 52 49 |...... VUL MATRI|
000001C0: 58 20 56 4F 4F 52 20 47 41 55 53 53 2D 45 4C 49 |X VOOR GAUSS-ELI|
000001D0: 4D 49 4E 41 54 49 45 00 E1 09 96 00 4E B2 4E AA |MINATIE.....N.N.|
000001E0: 31 00 EF 09 A0 00 81 20 4A B2 31 20 A4 20 46 00 |1...... J.1 . F.|
000001F0: FA 09 AA 00 44 28 4A 29 B2 30 00 08 0A B4 00 81 |....D(J).0......|
00000200: 20 49 B2 31 20 A4 20 53 00 1D 0A BE 00 44 28 4A | I.1 . S.....D(J|
00000210: 29 B2 44 28 4A 29 AA 58 28 49 29 AE 4A 00 25 0A |).D(J).X(I).J.%.|
00000220: C8 00 82 20 49 00 2D 0A CD 00 82 20 4A 00 3F 0A |... I.-.... J.?.|
00000230: D2 00 44 28 30 29 B2 53 3A 42 28 31 29 B2 30 00 |..D(0).S:B(1).0.|
00000240: 4D 0A DC 00 81 20 49 B2 31 20 A4 20 53 00 60 0A |M.... I.1 . S.`.|
00000250: E6 00 42 28 31 29 B2 42 28 31 29 AA 59 28 49 29 |..B(1).B(1).Y(I)|
00000260: 00 68 0A F0 00 82 20 49 00 76 0A FA 00 81 20 4A |.h.... I.v.... J|
00000270: B2 32 20 A4 20 4E 00 81 0A 04 01 42 28 4A 29 B2 |.2 . N.....B(J).|
00000280: 30 00 8F 0A 0E 01 81 20 49 B2 31 20 A4 20 53 00 |0...... I.1 . S.|
00000290: AD 0A 18 01 42 28 4A 29 B2 42 28 4A 29 AA 59 28 |....B(J).B(J).Y(|
000002A0: 49 29 AC 58 28 49 29 AE 28 4A AB 31 29 00 B5 0A |I).X(I).(J.1)...|
000002B0: 22 01 82 3A 82 00 C3 0A 2C 01 81 20 4A B2 31 20 |"..:....,.. J.1 |
000002C0: A4 20 4E 00 D1 0A 36 01 81 20 49 B2 4A 20 A4 20 |. N...6.. I.J . |
000002D0: 4E 00 E5 0A 40 01 41 28 4A 2C 49 29 B2 44 28 4A |N...@.A(J,I).D(J|
000002E0: AA 49 AB 32 29 00 EE 0A 4A 01 82 20 3A 82 00 08 |.I.2)...J.. :...|
000002F0: 0B 54 01 81 20 48 B2 31 20 A4 20 4E AB 31 3A 49 |.T.. H.1 . N.1:I|
00000300: B2 48 AA 31 3A 4B B2 48 00 19 0B 5E 01 8F 20 5A |.H.1:K.H...^.. Z|
00000310: 4F 45 4B 20 50 49 56 4F 54 00 39 0B 68 01 8B 20 |OEK PIVOT.9.h.. |
00000320: 41 42 28 41 28 49 2C 48 29 29 B1 B6 28 41 28 4B |AB(A(I,H))..(A(K|
00000330: 2C 48 29 29 A7 20 4B B2 49 00 51 0B 72 01 8B 20 |,H)). K.I.Q.r.. |
00000340: 49 B3 4E 20 A7 20 49 B2 49 AA 31 3A 89 20 33 36 |I.N . I.I.1:. 36|
00000350: 30 00 61 0B 7C 01 8B 20 4B B2 48 20 A7 20 34 32 |0.a.|.. K.H . 42|
00000360: 30 00 86 0B 86 01 81 20 4A B2 48 20 A4 20 4E 3A |0...... J.H . N:|
00000370: 55 B2 41 28 48 2C 4A 29 3A 41 28 48 2C 4A 29 B2 |U.A(H,J):A(H,J).|
00000380: 41 28 4B 2C 4A 29 00 95 0B 90 01 41 28 4B 2C 4A |A(K,J).....A(K,J|
00000390: 29 B2 55 3A 82 00 B1 0B 9A 01 55 B2 42 28 48 29 |).U:......U.B(H)|
000003A0: 3A 42 28 48 29 B2 42 28 4B 29 3A 42 28 4B 29 B2 |:B(H).B(K):B(K).|
000003B0: 55 00 CC 0B 9F 01 8F 20 45 4C 49 4D 49 4E 45 45 |U...... ELIMINEE|
000003C0: 52 20 4D 41 54 52 49 58 58 52 49 4A 00 D6 0B A4 |R MATRIXXRIJ....|
000003D0: 01 49 B2 48 AA 31 00 F3 0B AE 01 55 B2 41 28 49 |.I.H.1.....U.A(I|
000003E0: 2C 48 29 AD 41 28 48 2C 48 29 3A 41 28 49 2C 48 |,H).A(H,H):A(I,H|
000003F0: 29 B2 30 00 03 0C B8 01 81 20 4A B2 48 AA 31 20 |).0...... J.H.1 |
00000400: A4 20 4E 00 20 0C BD 01 41 28 49 2C 4A 29 B2 41 |. N. ...A(I,J).A|
00000410: 28 49 2C 4A 29 AB 55 AC 41 28 48 2C 4A 29 3A 82 |(I,J).U.A(H,J):.|
00000420: 00 35 0C C2 01 42 28 49 29 B2 42 28 49 29 AB 55 |.5...B(I).B(I).U|
00000430: AC 42 28 48 29 00 4D 0C C7 01 8B 20 49 B3 4E 20 |.B(H).M.... I.N |
00000440: A7 20 49 B2 49 AA 31 3A 89 20 34 33 30 00 53 0C |. I.I.1:. 430.S.|
00000450: CC 01 82 00 68 0C D6 01 43 28 4E 29 B2 42 28 4E |....h...C(N).B(N|
00000460: 29 AD 41 28 4E 2C 4E 29 00 7A 0C DB 01 81 20 49 |).A(N,N).z.... I|
00000470: B2 4E AB 31 A4 31 A9 20 AB 31 00 82 0C E0 01 55 |.N.1.1. .1.....U|
00000480: B2 30 00 A1 0C E5 01 81 20 4A B2 49 AA 31 A4 20 |.0...... J.I.1. |
00000490: 4E 3A 55 B2 55 AA 41 28 49 2C 4A 29 AC 43 28 4A |N:U.U.A(I,J).C(J|
000004A0: 29 00 BA 0C EA 01 43 28 49 29 B2 28 42 28 49 29 |).....C(I).(B(I)|
000004B0: AB 55 29 AD 41 28 49 2C 49 29 00 C3 0C EF 01 82 |.U).A(I,I)......|
000004C0: 20 3A 82 00 E5 0C F4 01 99 3A 99 22 4D 41 43 48 | :.......:."MACH|
000004D0: 54 20 56 41 4E 20 58 20 20 20 4B 4F 45 46 46 49 |T VAN X KOEFFI|
000004E0: 43 49 45 4E 54 00 F3 0C FE 01 81 20 49 B2 31 20 |CIENT...... I.1 |
000004F0: A4 20 4E 00 10 0D 03 02 99 22 20 20 20 22 3B 49 |. N......" ";I|
00000500: AB 31 2C 22 20 20 20 20 22 3B 43 28 49 29 3A 82 |.1," ";C(I):.|
00000510: 00 18 0D 08 02 99 3A 99 00 20 0D 0D 02 57 B2 30 |......:.. ...W.0|
00000520: 00 2E 0D 12 02 81 20 4A B2 31 20 A4 20 53 00 36 |...... J.1 . S.6|
00000530: 0D 17 02 55 B2 30 00 5A 0D 1C 02 81 20 4B B2 31 |...U.0.Z.... K.1|
00000540: 20 A4 20 4E 3A 55 B2 55 AA 43 28 4B 29 AC 58 28 | . N:U.U.C(K).X(|
00000550: 4A 29 AE 28 4B AB 31 29 3A 82 00 78 0D 26 02 57 |J).(K.1):..x.&.W|
00000560: B2 57 AA 28 28 59 28 4A 29 AB 55 29 AC 28 59 28 |.W.((Y(J).U).(Y(|
00000570: 4A 29 AB 55 29 29 3A 82 00 B1 0D 30 02 99 22 53 |J).U)):....0.."S|
00000580: 4F 4D 20 56 44 20 4B 57 41 44 52 41 54 49 53 43 |OM VD KWADRATISC|
00000590: 48 45 20 46 4F 55 54 20 49 53 3A 20 22 3B B5 28 |HE FOUT IS: ";.(|
000005A0: 57 AC 31 30 30 30 30 AA 2E 35 29 AD 31 30 30 30 |W.10000..5).1000|
000005B0: 30 00 DA 0D 3A 02 99 22 43 48 49 20 49 53 3A 20 |0...:.."CHI IS: |
000005C0: 22 3B B5 28 BA 28 57 AD 53 29 AC 31 30 30 30 30 |";.(.(W.S).10000|
000005D0: AA 2E 35 29 AD 31 30 30 30 30 00 FA 0D 49 02 99 |..5).10000...I..|
000005E0: 3A 99 22 54 59 50 45 20 39 39 20 56 4F 4F 52 20 |:."TYPE 99 VOOR |
000005F0: 48 45 52 48 41 4C 49 4E 47 22 00 1B 0E 4E 02 99 |HERHALING"...N..|
00000600: 22 54 59 50 45 20 31 20 20 56 4F 4F 52 20 41 4E |"TYPE 1 VOOR AN|
00000610: 44 45 52 45 20 4F 52 44 45 20 22 00 3C 0E 53 02 |DERE ORDE ".<.S.|
00000620: 99 22 54 59 50 45 20 32 20 20 56 4F 4F 52 20 49 |."TYPE 2 VOOR I|
00000630: 4E 54 45 52 50 4F 4C 41 54 49 45 22 00 4B 0E 55 |NTERPOLATIE".K.U|
00000640: 02 85 20 5A 3A 5A B2 B5 28 5A 29 00 5B 0E 58 02 |.. Z:Z..(Z).[.X.|
00000650: 8B 20 5A B2 31 20 A7 20 31 34 30 00 6C 0E 5A 02 |. Z.1 . 140.l.Z.|
00000660: 8B 20 5A B2 39 39 20 A7 20 31 30 30 00 7D 0E 5D |. Z.99 . 100.}.]|
00000670: 02 8B 20 5A B3 B1 32 20 A7 20 35 38 35 00 93 0E |.. Z..2 . 585...|
00000680: 62 02 99 3A 85 20 22 58 20 49 53 20 22 3B 48 3A |b..:. "X IS ";H:|
00000690: 59 B2 30 00 A4 0E 67 02 8B 20 48 B2 39 39 20 A7 |Y.0...g.. H.99 .|
000006A0: 20 35 38 35 00 B2 0E 6C 02 81 20 49 B2 31 20 A4 | 585...l.. I.1 .|
000006B0: 20 4E 00 C9 0E 76 02 59 B2 59 AA 43 28 49 29 AC | N...v.Y.Y.C(I).|
000006C0: 48 AE 28 49 AB 31 29 3A 82 00 D9 0E 80 02 99 22 |H.(I.1):......."|
000006D0: 59 20 49 53 20 20 22 3B 59 00 E3 0E 8A 02 89 20 |Y IS ";Y...... |
000006E0: 36 31 30 00 00 00 |610... |
..%.... ***** PROGRAM POLYNOMEN *****.I.
... POLYNOOM INTERPOLATIE VOLGENS.J....
DE METHODE VAN DE KLEINSTE...(.. KWADRAT
EN. MAXIMAAL 100 PUNTEN....2.. DATA-INVO
ER AFSLUITEN MET 99,99.N.4.. 53280,0:. 5
3281,0...6..".. PROGRAM POLYNOMEN .."...
8.. X(100),Y(100),A(10,10),C(20).".:.. B
(20),D(20).2.D.. I.1 . 100.I.N.. "X,Y ";
X(I),Y(I).O.X.. X(I).99 . Y(I).99 . S.I.
1:I.100.W.... I......".ORDE ";N:N..(N):F
.N.N...... N.9 . N..S . N.1. 140.W.... V
UL MATRIX VOOR GAUSS-ELIMINATIE.....N.N.
1... .. J.1 . F.....D(J).0...... I.1 . S
.....D(J).D(J).X(I).J.%.H.. I.-.M.. J.?.
R.D(0).S:B(1).0.M.... I.1 . S.`...B(1).B
(1).Y(I).H.... I.V.... J.2 . N.....B(J).
0...... I.1 . S.....B(J).B(J).Y(I).X(I).
(J.1)..."..:..C.,.. J.1 . N.Q.6.. I.J .
N...@.A(J,I).D(J.I.2)...J.. :....T.. H.1
. N.1:I.H.1:K.H...^.. ZOEK PIVOT.9.H..
AB(A(I,H))..(A(K,H)). K.I.Q.R.. I.N . I.
I.1:. 360.A.|.. K.H . 420...... J.H . N:
U.A(H,J):A(H,J).A(K,J).....A(K,J).U:....
..U.B(H):B(H).B(K):B(K).U.L.... ELIMINEE
R MATRIXXRIJ.V...I.H.1.....U.A(I,H).A(H,
H):A(I,H).0...... J.H.1 . N. ...A(I,J).A
(I,J).U.A(H,J):..5.B.B(I).B(I).U.B(H).M.
G.. I.N . I.I.1:. 430.S.L...H.V.C(N).B(N
).A(N,N).Z.... I.N.1.1. .1.....U.0......
J.I.1. N:U.U.A(I,J).C(J).....C(I).(B(I)
.U).A(I,I).C.... :.......:."MACHT VAN X
KOEFFICIENT...... I.1 . N......" ";I
.1," ";C(I):.......:.. ...W.0...... J
.1 . S.6...U.0.Z.... K.1 . N:U.U.C(K).X(
J).(K.1):..X.&.W.W.((Y(J).U).(Y(J).U)):.
...0.."SOM VD KWADRATISCHE FOUT IS: ";.(
W.10000..5).10000.Z.:.."CHI IS: ";.(.(W.
S).10000..5).10000...I..:."TYPE 99 VOOR
HERHALING"...N.."TYPE 1 VOOR ANDERE ORD
E ".<.S.."TYPE 2 VOOR INTERPOLATIE".K.U
.. Z:Z..(Z).[.X.. Z.1 . 140.L.Z.. Z.99 .
100.}.].. Z..2 . 585...B..:. "X IS ";H:
Y.0...G.. H.99 . 585...L.. I.1 . N.I.V.Y
.Y.C(I).H.(I.1):..Y...."Y IS ";Y......
610...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL