Algorithm 如何在Ada中进行快速排序

如何在Ada中快速排序？ 我也希望有一个函数来测试它。

---

我使用GPS作为IDE

可以找到Ada中的一个示例。请注意，您需要这三个文件。

可以找到Ada中的一个示例。注意：您需要这三个文件。

您可以在

获取快速排序代码。如果快速排序不是严格必需的，为什么不使用通用过程

---

编辑：大多数通用数组排序的实现都将使用快速排序，因此请检查您的使用情况，您可能不必实现自己的快速排序。

如果快速排序不是严格必需的，为什么不使用通用过程

编辑：大多数通用数组排序的实现都将使用快速排序，因此请检查您使用的是什么，您可能不必实现自己的快速排序。

代码 使用GNAT GPL 2015在Windows 10上编译。 从…转换而来

带有Ada.Text\u IO；
使用Ada.Float_Text_IO；
用Ada.Strings；
使用Ada.Strings.Fixed；
主要程序是
通用的
类型元素是私有的；
通用交换程序（A、B：输入输出元素）；
通用交换程序（A，B：输入输出元素）为
温度：常量元素：=A；
开始
A:=B；
B:=温度；
结束；
通用的
类型索引为（）；
类型元素是私有的；
类型向量是元素的数组（索引范围）；
使用函数“”（左、右：元素）返回布尔值为；
程序通用快速排序（项目：输入输出向量）；
程序通用\u快速排序（项目：输入输出向量）为
程序交换是新的通用交换（元素）；
杂注抑制（溢出检查）；
杂注抑制（范围检查）；
支点：元素；
左：索引；
右：索引；
开始
如果项目长度>1，则
枢轴：=项目（项目的最后一项）；--选择轴元素。
左：=第一项；
右：=项目的最后一个；
而左代码
使用GNAT GPL 2015在Windows 10上编译。
从…转换而来

带有Ada.Text\u IO；
使用Ada.Float_Text_IO；
用Ada.Strings；
使用Ada.Strings.Fixed；
主要程序是
通用的
类型元素是私有的；
通用交换程序（A、B：输入输出元素）；
通用交换程序（A，B：输入输出元素）为
温度：常量元素：=A；
开始
A:=B；
B:=温度；
结束；
通用的
类型索引为（）；
类型元素是私有的；
类型向量是元素的数组（索引范围）；
使用函数“”（左、右：元素）返回布尔值为；
程序通用快速排序（项目：输入输出向量）；
程序通用\u快速排序（项目：输入输出向量）为
程序交换是新的通用交换（元素）；
杂注抑制（溢出检查）；
杂注抑制（范围检查）；
支点：元素；
左：索引；
右：索引；
开始
如果项目长度>1，则
枢轴：=项目（项目的最后一项）；--选择轴元素。
左：=第一项；
右：=项目的最后一个；
虽然与其他任何语言都差不多（虽然数组语法更方便），但问题是我真的不知道Ada，我只是在涉猎它。因此，如果有人知道如何做，我很想看看它，并与其他语言进行比较。osettacode.org是一个比较语言的好网站。这是家庭作业吗？不，我们在学校学java。我正在研究不同的语言，我试图变得更全面。LOL几乎和你在任何其他语言中所做的一样（虽然数组语法更方便）。问题是我真的不知道Ada，我正在涉猎它。因此，如果有人知道如何做，我很想看看它，并与其他语言进行比较。osettacode.org是一个比较语言的好网站。这是家庭作业吗？不，我们在学校学java。我正在研究不同的语言，我试图变得更全面。谢谢。我试着把它放到IDE里。我犯了以下错误，你知道为什么吗？转换输入中的无效字节序列“Element\u Array”未定义“Element\u Type”未定义“Index\u Type”未定义不确定，我从未对Ada做过任何操作-我只是决定查找一个示例，这就是我发现的：-1：其他源的复制粘贴不完整。提供链接就足够了。你错过了ads文件。1）这里不是讨论错误的地方，2）没有错误，没有人可以帮助你，3）返回rosettacode并阅读整个Ada部分。它由三个文件组成。GPS依赖于项目设置，无需先尝试（在命令行上）。谢谢。我试着把它放到IDE里。我犯了以下错误，你知道为什么吗？转换输入中的无效字节序列“Element\u Array”未定义“Element\u Type”未定义“Index\u Type”未定义不确定，我从未对Ada做过任何操作-我只是决定查找一个示例，这就是我发现的：-1：其他源的复制粘贴不完整。提供链接就足够了。你错过了ads文件。1）这里不是讨论错误的地方，2）没有错误，没有人可以帮助你，3）返回rosettacode并阅读整个Ada部分。它由三个文件组成。GPS依赖于项目设置，请先尝试而不尝试（在命令行上）。如果您只是在使用该语言，并且希望了解快速排序在该语言中是如何完成的（可能与其他语言相比），Rosettacode是一个不错的选择。如果您只是在使用该语言，并且希望了解快速排序在该语言中是如何完成的（也许与其他语言相比），Rosettacode是一个不错的选择。
MERCURY 0.80
  VENUS 0.10
  EARTH 0.40
   MARS 0.90
JUPITER 0.00
 SATURN 0.70
 URANUS 0.50
NEPTUNE 0.30
  PLUTO 0.70

MERCURY 0.00
  VENUS 0.10
  EARTH 0.30
   MARS 0.40
JUPITER 0.50
 SATURN 0.70
 URANUS 0.70
NEPTUNE 0.80
  PLUTO 0.90