|
DataMuseum.dkPresents historical artifacts from the history of: Bogika Butler |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Bogika Butler Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 768 (0x300) Types: TextFile Names: »PREDEF.PAS«
└─⟦f983c2ef3⟧ Bits:30004681 Pascal opgaver (Butler) └─ ⟦this⟧ »PREDEF.PAS«
PROGRAM predef; BEGIN IF CLRHOM = '' THEN WRITELN('AK') ELSE WRITELN('OK'); IF CLREOS = '' THEN WRITELN('AK') ELSE WRITELN('OK'); IF CLREOL = '' THEN WRITELN('AK') ELSE WRITELN('OK'); IF INSLIN = '' THEN WRITELN('AK') ELSE WRITELN('OK'); IF DELLIN = '' THEN WRITELN('AK') ELSE WRITELN('OK'); IF RVSON = '' THEN WRITELN('AK') ELSE WRITELN('OK'); IF RVSOFF = '' THEN WRITELN('AK') ELSE WRITELN('OK'); END. «eof»