DataMuseum.dk

Presents historical artifacts from the history of:

CP/M

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

See our Wiki for more about CP/M

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦fda9012c2⟧ TextFile

    Length: 384 (0x180)
    Types: TextFile
    Names: »PAUSE-BT.ID«

Derivation

└─⟦be08f6879⟧ Bits:30003899/Brug_pæren_lærer-tekst.imd Brug pæren Rev. 1.0 (Piccolo)
    └─⟦this⟧ »PAUSE-BT.ID«

TextFile

0010 // "pause-bTID"
0020 // 646-655 gennemløb/sekund
0030 //
0040 INPUT "Antal gennemløb: ": antløb
0050 start:=SYS(3)/50
0060 FOR n:=1 TO antløb DO
0070 NEXT n
0080 slut:=SYS(3)/50
0090 tid:=slut-start
0100 PRINT tid;"sekunder pr. ";antløb;"gennemløb !"
0110 END 
▶19◀«eof»