pascal语言排队接水问题

pascal语言排队接水问题

追问请解释一下 tem:=num[i];num[i]:=num[j];num[j]:=t; 谢谢！追答是你抄漏了二个字母，我还以为是图上也错了呢。
tem:=num[i];num[i]:=num[j];num[j]:=tem;这是与上一行组合起来，共同作用的，交换二个人的数据（编号和接水时间）这一行的作用是交换二人的接水时间。

其实就是把这个等待时间按数字从小到大排列，这个序列应该就是答案。可以这么考虑，以你给的例子为例，假设就5个人等，把那个需要别人等8分钟的人排第一位的话，至少其余人都要至少有8分钟的等待时间，而如果把这个放到最后一个，那么总的等待时间就肯定会少掉这8分钟，当然平均时间就会变少。依照这个思路推断就是从小到大的一个排列而已。
以此，程序也就出来了。