Delphi高手help我!!~~

圖片參考：http://hk.yimg.com/i/icon/16/1.gif
用Delphi 的 Random function ，見如下：

Declaration:
function Random[(MaxValue: Integer)];

Description
Returns a randomly generated number within a specified range.
If MaxValue is not specified Random returns a real number X where 0 <= x <1. If MaxValue is specified the X than falls between 0 and MaxValue. To initialize the random number generator, call (once) the Randomize procedure.

Example:




Randomize;

Random; // results in a random number 0 <= x <1
Random(50); // results in a random number 0 <= x <50

Randomize, RandomRange, RandomFrom,

You can use the Random(10) to achieve your goal.
Please do the remaining by yourself.