DataMuseum.dk

Presents historical artifacts from the history of:

MIKADOS

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about MIKADOS

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦7eeb5fa3d⟧

    Length: 448 (0x1c0)
    Notes: Mikados TextFile, Mikados_K
    Names: »ANTILOG«

Derivation

└─⟦4cd80c18f⟧ Bits:30003895/4xCOMAL3a.imd 4 * COMAL - SPC/1 - Disketter til bogen
    └─⟦this⟧ »ANTILOG« 
└─⟦bcf7b34c7⟧ Bits:30003895/4xCOMAL2.imd 4 * COMAL - SPC/1 - Disketter til bogen
    └─⟦this⟧ »ANTILOG«

Text

0010 // ------------ antilog ---------------------
0020 PROC ANTILOG(X)
0030 ANTILOG:=10**X
0040 ENDPROC ANTILOG
0050 // 
0060 CLEAR 
0065 PRINT 
0070 INPUT "Indtast et tal:    ":A
0080 PRINT "Antilog(";A;") = ";ANTILOG(A)