几个随即数同时显示的问题

Question

我要6个随即数 分别是1到10 20到30 40到50 60到70 70到80 80到90 
显示在MEMO中 请各位赐教

Answer 1

  Memo1.Lines.Add(IntToStr(RandomRange(1, 10)));
  Memo1.Lines.Add(IntToStr(RandomRange(20, 30)));
  Memo1.Lines.Add(IntToStr(RandomRange(40, 50)));
  Memo1.Lines.Add(IntToStr(RandomRange(60, 70)));
  Memo1.Lines.Add(IntToStr(RandomRange(70, 80)));
  Memo1.Lines.Add(IntToStr(RandomRange(80, 90)));

Answer 2

代码一粘贴进去 说 为明说标识符..RandomRange 怎么办啊 能不能把代码写全点啊

Answer 3

如果能够再完善下就好了，因为这样产生的MEMO1里的数列是有可能重复的，怎么样避免重复，产生互不相同的数列？