UC知道pascal 随机函数用不了
来源：百度知道 编辑：UC知道 时间：2024/09/20 08:50:31
程序：
for i:=1 to 6 do
ab[i]:=random(100);
每次执行到此，总显示random后面
'.'expected
random需要加句号吗？
郁闷中……
正确=加10分。
我加了randomize，还是不行。
如果写
randomize;
aa:=100;
ab[i]:=random.aa;
writeln(ab[i]) ;
就会每次都输出100.
for i:=1 to 6 do
ab[i]:=random(100);
每次执行到此，总显示random后面
'.'expected
random需要加句号吗？
郁闷中……
正确=加10分。
我加了randomize，还是不行。
如果写
randomize;
aa:=100;
ab[i]:=random.aa;
writeln(ab[i]) ;
就会每次都输出100.
先加个randomize就行了
var
a:array[1..10] of integer;
i:integer;
begin
randomize;
for i:= 1 to 6 do a[i]:= random(100);
for i:= 1 to 6 do write(a[i],' ');
writeln;
readln;
end.
你加了randomize就应该行啊
我在家拿 free pascal写一下没出现你说的那种请况啊
你是用turbo pascal 还是 free pascal?
应该是randomize
程序如下
var
i:integer;
ab:array[1..6] of integer;
begin
randomize;
for i:=1 to 6 do
ab[i]:=random(100);
writeln(ab[i]);
end.
random在使用前要加一个语句来生成随机函数
应该这么写
randomize;
for i:=1 to 6 do
ab[i]:=random(100);
这样就对了
发现怎么这么多人这么不要脸，一样的答案还要再说一边，shameless，是不是ab数组定义的不对，还有，不能random aa的，random里面不是什么都可以加的
应先初始化，用randomize语句，二楼的可以
不用加句号,你用random前要播一个随机种子randomize,后面加分号,不然不能写random.