|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC759 "Piccoline" |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC759 "Piccoline" Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Names: »HYPERGEO.CSV«
└─⟦c41625364⟧ Bits:30002680 PGM2 - indeholder forskellige undervisningsprogrammer
└─ ⟦this⟧ »HYPERGEO.CSV«
└─⟦cd307176b⟧ Bits:30002666 Programmer fra Forlaget FAG ApS
└─ ⟦this⟧ »HYPERGEO.CSV«
0x000…020 20 83 71 c7 20 44 37 08 ee 07 30 31 2f 68 79 70 65 72 67 65 6f 2e 66 64 6c 20 0a 00 d3 1f 01 01 ┆ q D7 01/hypergeo.fdl ┆
0x020…040 20 48 79 70 65 72 67 65 6f 6d 65 74 72 69 73 6b 20 66 6f 72 64 65 6c 69 6e 67 2e 20 20 20 20 54 ┆ Hypergeometrisk fordeling. T┆
0x040…060 42 20 61 70 72 69 6c 20 31 39 38 34 2e 20 20 43 4f 4d 41 4c 20 38 30 00 14 00 67 07 81 f1 04 00 ┆B april 1984. COMAL 80 g ┆
0x060…080 40 a0 2d 00 01 00 1e 00 86 27 08 d0 01 20 00 00 00 00 00 82 55 00 36 c0 33 00 48 20 59 20 50 20 ┆@ - ' U 6 3 H Y P ┆
0x080…0a0 45 20 52 20 47 20 45 20 4f 20 4d 20 45 20 54 20 52 20 49 20 53 20 4b 20 20 20 20 20 46 20 4f 20 ┆E R G E O M E T R I S K F O ┆
0x0a0…0c0 52 20 44 20 45 20 4c 20 49 20 4e 20 47 00 15 00 07 00 01 00 28 00 86 04 08 00 01 00 32 00 86 1a ┆R D E L I N G ( 2 ┆
0x0c0…0e0 2a c0 27 00 50 6f 70 75 6c 61 74 69 6f 6e 65 6e 73 20 73 74 7c 72 72 65 6c 73 65 20 62 65 74 65 ┆* ' Populationens størrelse bete┆
0x0e0…100 67 6e 65 73 20 6d 65 64 20 4e 2e 00 07 00 01 00 3c 00 86 15 20 c0 1d 00 48 65 72 61 66 20 65 72 ┆gnes med N. < Heraf er┆
0x100…120 20 64 20 65 6c 65 6d 65 6e 74 65 72 20 64 65 66 65 6b 74 65 2e 00 07 00 01 00 46 00 86 1a 2a c0 ┆ d elementer defekte. F * ┆
0x120…140 28 00 44 65 72 20 75 64 74 61 67 65 73 20 65 6e 20 73 74 69 6b 70 72 7c 76 65 20 70 7d 20 6e 20 ┆( Der udtages en stikprøve på n ┆
0x140…160 65 6c 65 6d 65 6e 74 65 72 20 07 3b 01 00 50 00 86 16 22 c0 20 00 62 6c 61 6e 64 74 20 64 65 20 ┆elementer ; P " blandt de ┆
0x160…180 4e 20 75 64 65 6e 20 74 69 6c 62 61 67 65 6c 7b 67 6e 69 6e 67 2e 07 00 01 00 5a 00 86 04 08 00 ┆N uden tilbagelægning. Z ┆
0x180…1a0 01 00 64 00 86 21 38 c0 35 00 50 72 6f 67 72 61 6d 6d 65 74 20 62 65 72 65 67 6e 65 72 20 73 61 ┆ d !8 5 Programmet beregner sa┆
0x1a0…1c0 6e 64 73 79 6e 6c 69 67 68 65 64 65 6e 20 66 6f 72 20 6a 3d 30 2c 20 6a 3d 31 2c 20 2e 2e 2e 00 ┆ndsynligheden for j=0, j=1, ... ┆
0x1c0…1e0 07 00 01 00 6e 00 86 16 22 c0 1f 00 64 65 66 65 6b 74 65 20 65 6c 65 6d 65 6e 74 65 72 20 69 20 ┆ n " defekte elementer i ┆
0x1e0…200 73 74 69 6b 70 72 7c 76 65 6e 2e 00 07 00 01 00 78 00 83 04 00 00 01 00 82 00 86 04 08 00 01 00 ┆stikprøven. x ┆
0x200…220 8c 00 83 20 38 72 01 01 20 64 65 20 6e 20 65 6c 65 6d 65 6e 74 65 72 20 69 20 73 74 69 6b 70 72 ┆ 8r de n elementer i stikpr┆
0x220…240 7c 76 65 6e 20 62 65 74 65 67 6e 65 73 20 6d 65 64 20 73 20 69 20 70 72 6f 67 72 61 6d 6d 65 74 ┆øven betegnes med s i programmet┆
0x240…260 96 00 87 17 18 c0 16 00 49 6e 64 74 61 73 74 20 20 4e 20 2c 20 64 20 2c 20 6e 20 20 3e 20 12 3a ┆ Indtast N , d , n > :┆
0x260…280 02 80 05 2c 06 80 05 2c 0a 80 05 00 01 00 a0 00 84 18 86 72 0a 80 02 80 26 00 06 80 02 80 26 00 ┆ , , r & & ┆
0x280…2a0 49 00 02 80 00 f0 2a 00 49 00 06 80 00 f0 29 00 49 00 0a 80 00 f0 2a 00 49 00 2d 0a 01 00 aa 00 ┆I * I ) I * I - ┆
0x2a0…2c0 86 04 08 00 01 00 b4 00 86 24 3e c0 3b 00 20 6a 20 20 20 20 20 20 20 50 28 58 3d 6a 29 20 20 20 ┆ $> ; j P(X=j) ┆
0x2c0…2e0 20 20 20 50 28 58 3c 3d 6a 29 20 20 20 20 20 20 48 79 70 65 72 67 65 6f 6d 65 74 72 69 73 6b 20 ┆ P(X<=j) Hypergeometrisk ┆
0x2e0…300 66 6f 72 64 65 6c 69 6e 67 00 07 00 01 00 be 00 86 2c 2a c0 27 00 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e ┆fordeling ,* ' ..........┆
0x300…320 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 20 20 20 20 20 20 4e 20 3d 20 00 07 3b ┆................... N = ;┆
0x320…340 02 80 07 3b 08 c0 05 00 20 64 20 3d 20 00 07 3b 06 80 07 3b 08 c0 05 00 20 6e 20 3d 20 00 07 3b ┆ ; d = ; ; n = ;┆
0x340…360 0a 80 07 00 01 00 c8 00 d1 19 0e 80 00 f0 1d 1b 12 80 81 f1 1d 00 01 01 20 73 74 61 72 74 76 7b ┆ startvæ┆
0x360…380 72 64 69 65 6e 20 66 6f 72 20 70 20 75 64 72 65 67 6e 65 73 20 6e 75 00 d2 00 3f 26 38 72 88 74 ┆rdien for p udregnes nu ?&8r t┆
0x380…3a0 0e 80 0a 80 06 80 24 00 02 80 23 00 29 00 2d 72 01 01 20 6a 20 3e 3d 20 6e 2b 64 2d 4e 20 3c 3d ┆ $ # ) -r j >= n+d-N <=┆
0x3a0…3c0 3e 20 4e 2d 64 20 3e 3d 20 6e 2d 6a 20 20 65 6e 20 6b 6c 61 72 20 66 6f 72 75 64 73 7b 74 6e 69 ┆> N-d >= n-j en klar forudsætni┆
0x3c0…3e0 6e 67 21 00 dc 00 5e 27 16 80 81 f1 1d 00 0a 80 3b 00 11 3c d1 00 12 80 12 80 02 80 06 80 23 00 ┆ng! ^' ; < # ┆
0x3e0…400 16 80 23 00 81 f1 24 00 14 00 21 00 02 80 16 80 23 00 81 f1 24 00 14 00 22 00 1d 00 01 01 20 73 ┆ # $ ! # $ " s┆
0x400…420 74 61 72 74 76 7b 72 64 69 20 6d 65 64 20 6a 3d 30 00 e6 00 5d 18 f0 74 01 01 20 7c 67 20 6a 20 ┆tartværdi med j=0 Å t øg j ┆
0x420…440 74 69 6c 20 64 65 6e 20 66 7c 72 73 74 65 20 76 7b 72 64 69 2c 20 68 76 6f 72 20 6e 2d 6a 3d 4e ┆til den første værdi, hvor n-j=N┆
0x440…460 2d 64 f0 00 81 23 0e 80 0a 80 06 80 24 00 02 80 23 00 27 00 2d 3c d1 00 0e 80 0e 80 81 f1 24 00 ┆-d # $ # ' -< $ ┆
0x460…480 1d 00 01 01 20 6f 67 20 62 65 72 65 67 6e 20 73 74 61 72 74 76 7b 72 64 69 65 6e 20 6d 65 64 20 ┆ og beregn startværdien med ┆
0x480…4a0 64 65 74 74 65 20 6a 00 fa 00 d1 0e 12 80 06 80 0e 80 02 02 1a 80 02 80 0a 80 02 02 1a 80 22 00 ┆dette j " ┆
0x4a0…4c0 1d 00 01 00 04 01 80 03 01 00 0e 01 d1 06 1e 80 12 80 1d 00 01 00 18 01 d3 03 01 00 22 01 82 11 ┆ " ┆
0x4c0…4e0 38 72 50 75 12 80 7c f5 27 00 0e 80 0a 80 26 00 49 00 0e 80 06 80 26 00 49 00 2d 3d 01 00 2c 01 ┆8rPu ø ' & I & I -= , ┆
0x4e0…500 d1 12 0e 80 0e 80 81 f1 24 00 1d 1b 12 80 0e 80 02 01 27 80 1d 1b 1e 80 1e 80 12 80 24 00 1d 00 ┆ $ ' $ ┆
0x500…520 01 00 36 01 a1 04 02 75 01 00 40 01 d3 03 01 00 4a 01 82 11 38 72 ae 75 0e 80 0a 80 26 00 0e 80 ┆ 6 u @ J 8r u & ┆
0x520…540 06 80 26 00 49 00 12 80 7c f5 29 00 49 00 2d 3d 01 00 54 01 65 05 2d 80 2d 0d 01 00 5e 01 d1 12 ┆ & I ø ) I -= T e - - ^ ┆
0x540…560 0e 80 0e 80 81 f1 24 00 1d 1b 12 80 0e 80 02 01 27 80 1d 1b 1e 80 1e 80 12 80 24 00 1d 00 01 00 ┆ $ ' $ ┆
0x560…580 68 01 a1 04 56 75 01 00 72 01 86 04 08 00 01 00 7c 01 87 17 20 c0 1d 00 5c 6e 73 6b 65 73 20 66 ┆h Vu r ø Ønskes f┆
0x580…5a0 6c 65 72 65 20 6b 7c 72 73 6c 65 72 20 3f 20 28 6a 2f 6e 29 20 00 12 3a 40 a0 05 00 01 00 86 01 ┆lere kørsler ? (j/n) :@ ┆
0x5a0…5c0 84 0a 3e 72 40 a0 04 c0 01 00 6e 00 19 00 2d 0a 01 00 90 01 8a 0a 0a c0 07 00 53 53 48 4d 45 4e ┆ >r@ n - SSHMEN┆
0x5c0…5e0 55 00 2d 70 01 00 9a 01 d3 26 01 01 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e ┆U -p & ....................┆
0x5e0…600 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e ┆................................┆
0x600…620 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 00 a4 01 78 20 dc 76 00 01 27 80 0e 80 00 00 ┆................. x v ' ┆
0x620…640 2d 00 01 01 20 65 6e 20 72 65 6b 75 72 73 69 6f 6e 73 66 6f 72 6d 65 6c 20 62 65 6e 79 74 74 65 ┆- en rekursionsformel benytte┆
0x640…660 73 20 76 65 64 20 62 65 72 65 67 6e 69 6e 67 65 6e 00 ae 01 99 1e 12 80 06 80 0e 80 23 00 81 f1 ┆s ved beregningen # ┆
0x660…680 24 00 14 00 21 00 0a 80 0e 80 23 00 81 f1 24 00 14 00 21 00 02 80 06 80 23 00 0a 80 23 00 0e 80 ┆$ ! # $ ! # # ┆
0x680…6a0 24 00 14 00 22 00 0e 80 22 00 2d 0e 01 00 b8 01 aa 04 27 80 01 00 c2 01 d3 03 01 00 cc 01 63 07 ┆$ " " - ' c ┆
0x6a0…6c0 2c 77 00 00 2d 80 2d 00 01 00 d6 01 86 1a 1e c0 1b 00 23 23 23 20 20 20 20 20 20 23 2e 23 23 23 ┆,w - - ### #.###┆
0x6c0…6e0 23 20 20 20 20 20 20 23 2e 23 23 23 23 00 2d 04 0e 80 09 2c 12 80 09 2c 1e 80 09 00 01 00 e0 01 ┆# #.#### - , , ┆
0x6e0…700 a3 04 2d 80 01 00 ea 01 d3 03 01 00 f4 01 78 0b 92 77 7f 02 1a 80 02 80 00 00 38 80 00 00 2d 7f ┆ - x w 8 - ┆
0x700…720 01 00 fe 01 d1 06 3c 80 81 f1 1d 00 01 00 08 02 5e 16 16 80 81 f1 1d 00 38 80 3b 00 11 3c d1 00 ┆ < ^ 8 ; < ┆
0x720…740 3c 80 3c 80 02 80 16 80 23 00 81 f1 24 00 14 00 21 00 16 80 22 00 1d 00 01 00 12 02 99 05 3c 80 ┆< < # $ ! " < ┆
0x740…760 2d 0e 01 00 1c 02 aa 04 1a 80 01 00 10 27 d6 00 00 00 02 4e 00 00 02 44 00 00 02 53 00 00 02 4a ┆- ' N D S J┆
0x760…780 00 00 02 50 00 00 02 49 63 c7 02 4b 00 00 07 4b 55 4d 53 53 48 71 c7 04 48 59 50 6a c7 09 55 44 ┆ P Ic K KUMSSHq HYPj UD┆
0x780…7a0 53 4b 52 49 46 54 00 00 02 52 00 00 02 51 57 c7 05 53 56 41 52 00 00 00 d4 1a 00 00 00 00 00 00 ┆SKRIFT R QW SVAR ┆
0x7a0…7c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x2…]