德尔福会做抽奖！！！

定义变量

Rname:数组[0..9]的字符串；

开始

Rname[0] := '张三'；

Rname[1] := '李四'；

Rname[2] := '王五'；

Rname[3] := '刘岚'；

Rname[4] := '李奇'；

Rname[5] := '乌龟'；

Rname[6] := '邦九'；

rname[7]:= ' Primary One '；

Rname[8] := '大二'；

Rname[9] := '老三'；

edit1。text:= Rname[Random(10)]；

结束；