DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC700 "Piccolo"

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

See our Wiki for more about RegneCentralen RC700 "Piccolo"

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦e22772cf1⟧ TextFile

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

Derivation

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

TextFile

0010 // "pause-aTID"
0020 // 143-145 gennemløb/sekund
0030 //
0040 INPUT "Antal gennemløb: ": antløb
0050 start:=SYS(3)/50
0060 n:=0
0070 REPEAT 
0080   n:=n+1
0090 UNTIL n=antløb
0100 slut:=SYS(3)/50
0110 tid:=slut-start
0120 PRINT tid;"sekunder pr. ";antløb;"gennemløb !"
0130 END 
▶19◀«eof»