掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
これはなんという記述方法なのでしょうか？ (ID:18355)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
スレッドを学んでいたところ、 Delphi6 Personalのスレッドサンプル("Threads")のソース中に下記の記述がありました。 >procedure TQuickSort.Sort(var A: array of Integer); > > procedure QuickSort(var A: array of Integer; iLo, iHi: Integer); > var > Lo, Hi, Mid, T: Integer; > begin > Lo := iLo; > Hi := iHi; > Mid := A[(Lo + Hi) div 2]; > repeat > while A[Lo] < Mid do Inc(Lo); > while A[Hi] > Mid do Dec(Hi); > if Lo <= Hi then > begin > VisualSwap(A[Lo], A[Hi], Lo, Hi); > T := A[Lo]; > A[Lo] := A[Hi]; > A[Hi] := T; > Inc(Lo); > Dec(Hi); > end; > until Lo > Hi; > if Hi > iLo then QuickSort(A, iLo, Hi); > if Lo < iHi then QuickSort(A, Lo, iHi); > if Terminated then Exit; > end; > >begin > QuickSort(A, Low(A), High(A)); >end; procedureの中にprocedureがあります。 これはなんていう記述方法なのでしょうか？ また、目的、利点は？
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.