identificationdivision. program-id. dahl-p61. * aus O-J Dahl - Verifiable Programming author. Jens. date-written. 5.1.2009. date-compiled. datadivision. working-storagesection. linkagesection.
77 x pic 9(4).
77 y pic 9(4).
77 z pic 9(4). proceduredivisionusing x y returning z. if x<y then move 0 to z else compute z=(x -y)/y+1 end-program dahl-p61.
¤ Dauer der Verarbeitung: 0.11 Sekunden
(vorverarbeitet)
¤
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.