Delphi(程序人生)

Delphi Programer DoubleCat

导航

2008年12月25日

随机产生不重复数字

摘要: 下面是一个在14个数据产生10个不重复的随机数-----------------------------------------------procedure TForm1.Button1Click(Sender: TObject);var a:array[1..14]of integer;//14个数 b:array[1..10]of integer;//结果 c:array[1..14]of ... 阅读全文

posted @ 2008-12-25 18:19 DoubleCat 阅读(646) 评论(1) 推荐(0) 编辑