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 - download

⟦41dd0b6fa⟧ TextFile

    Length: 768 (0x300)
    Types: TextFile
    Names: »PREDEF.PAS«

Derivation

└─⟦f983c2ef3⟧ Bits:30004681 Pascal opgaver (Butler)
    └─⟦this⟧ »PREDEF.PAS«

TextFile

l fjernes: ');
                             READLN(ud^.navn);
                             fjern(top, ud);
                           END;
                'U', 'u' : udskriv(top);
                'P', 'p' : BEGIN
                             WRITELN;
                             WRITE('Antal poster: ', postantal(top), ' ');
                             return;
                           END;
              END;
            UNTIL ch IN (.'A', 'a'.);
          END. (* post_ant *)
«eof»