var
Num:integer;
begin
Randomize;//初始化随机种子
Num:=random(10); //随机10以内的数字
showmessage(Inttostr(Num));
end;
本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。
提问和评论都可以，用心的回复会被更多人看到
评论
发布评论
相关文章
