|
DataMuseum.dkPresents historical artifacts from the history of: MIKADOS |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 448 (0x1c0)
Types: TextFile
Notes: Mikados_K
Names: »PH.K«
└─⟦92e6f589c⟧ Bits:30003895/4xCOMAL3b.imd 4 * COMAL - SPC/1 - Disketter til bogen
└─⟦this⟧ »PH.K«
└─⟦faca42ef2⟧ Bits:30003895/4xCOMAL1.imd 4 * COMAL - SPC/1 - Disketter til bogen
└─⟦this⟧ »PH.K«
0010 // ----------------------- pH ------------------------------ 0020 CLEAR 0030 INPUT "Indtast brintionskoncentrationen: ( 0 <konc< 1 ): ":KONC 0040 PRINT "Brintionskoncentration: ";KONC 0050 PRINT USING "pH: ###.##":(-LOG(KONC)/LOG(10))
0x000…043 Line {l1=0x41, l2=»0010 // ----------------------- pH ------------------------------«, l3=0x41}
0x043…050 Line {l1=0x0b, l2=»0020 CLEAR «, l3=0x0b}
0x050…09b Line {l1=0x49, l2=»0030 INPUT "Indtast brintionskoncentrationen: ( 0 <konc< 1 ): ":KONC«, l3=0x49}
0x09b…0cc Line {l1=0x2f, l2=»0040 PRINT "Brintionskoncentration: ";KONC«, l3=0x2f}
0x0cc…101 Line {l1=0x33, l2=»0050 PRINT USING "pH: ###.##":(-LOG(KONC)/LOG(10))«, l3=0x33}
0x101…120 00 00 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆ ----------------------------┆
0x120…140 2d 2d 41 0b 30 30 32 30 20 43 4c 45 41 52 20 0b 49 30 30 33 30 20 49 4e 50 55 54 20 22 49 6e 64 ┆--A 0020 CLEAR I0030 INPUT "Ind┆
0x140…160 74 61 73 74 20 62 72 69 6e 74 69 6f 6e 73 6b 6f 6e 63 65 6e 74 72 61 74 69 6f 6e 65 6e 3a 20 20 ┆tast brintionskoncentrationen: ┆
0x160…180 20 20 28 20 30 20 3c 6b 6f 6e 63 3c 20 31 20 29 3a 20 20 20 22 3a 4b 4f 4e 43 49 2f 30 30 34 30 ┆ ( 0 <konc< 1 ): ":KONCI/0040┆
0x180…1a0 20 50 52 49 4e 54 20 22 42 72 69 6e 74 69 6f 6e 73 6b 6f 6e 63 65 6e 74 72 61 74 69 6f 6e 3a 20 ┆ PRINT "Brintionskoncentration: ┆
0x1a0…1c0 20 20 20 20 20 22 3b 4b 4f 4e 43 2f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ";KONC/ ┆