|
identification division.
program-id. kw237.
* aus Kowalk - Korrekte Software
* p. 237
author. Jens.
date-written. 5.1.2009.
date-compiled.
data division.
working-storage section.
77 i pic 9(4).
77 j pic 9(4).
77 te pic 9(4).
77 val pic 9.
88 veraendert value 0.
88 unveraendert value 1.
linkage section.
77 rec pic 9(4) occurs 100.
77 rkey pic 9(4) occurs 100.
77 n pic 9(4).
procedure division using rec rkey n.
perform varying i from n by -1 until i<2
perform varying j from 2 until j>i
compute te=j -1
if rkey(te)>rkey(i) then
move rec(i) to rec(te)
end-if
end-perform
end-perform
end-program kw237.
¤ Diese beiden folgenden Angebotsgruppen bietet das Unternehmen0.22Angebot
Wie Sie bei der Firma Beratungs- und Dienstleistungen beauftragen können
¤
|
Lebenszyklus
Die hierunter aufgelisteten Ziele sind für diese Firma wichtig
Ziele
Entwicklung einer Software für die statische Quellcodeanalyse
|
