Pascal系统把具有共同特征的同一有序类型的对象汇集在一起,形成一个集合,可将集合类型的所有元素作为一个整体进行集合运算。[例5.11]用随机函数产生20个互不相同的40到100的随机整数,然后按从小到大顺序打印。解:按以下步骤处理:①为使产生的随机整数互不相同。因此,每产生一个数,都要判断集合中已否包含,如果没有包含,就放到集合中,并统计个数,直到20个。②将集合中的数移到数组中,此题利用下标序号从小到大的特征进行映射排序打印。Pascal程序:Program Exam511;UsesCrt ;Var a: Array[40..100] Of boolean;
dd: set Of 40..100;...