identification division.
program-id. krypt.
author. "JD".
date-written. 22.3.2006.
date-compiled.
data division.
working-storage section.
77 feld pic X.
88 suba value "A".
88 subb value "B".
88 subc value "C".
procedure division.
* call a
set suba to true.
call feld using feld
* call b
set subb to true.
call feld using feld
* call c
set subc to true.
call feld using feld
end-program krypt.
¤ Dauer der Verarbeitung: 0.13 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|