随机函数（Pascal入门）

标签：

随机函数是最基本的，在比赛的时候我们可以用随机函数来测试自己的程序是否会超时。

随机函数也可以做出一些大数据，用于两个程序之间对拍（一个是爆搜，一个是正解）。

当然平时我们也可以用随机函数测自己的程序，出题时随机函数是必不可少的。

下面就看一看随机函数如何编写（伪代码）：

1.首先我们要将随机生成的数据放入一个文本或记事本中，那么就要先写文件读写即为：

assign(input,‘***.in‘);

assign(output,‘***.out‘);

reset(input);

rewrite(output);（***为题目名或平时你想取的名字）；

...

close(input);

close(output);

2.接着随机函数必须出现一句话，就是：randomize；

3.然后当你想随机生成一个小于x的数存入y中：y:=random(x);(y可以为0）

一个完整的随机函数：（生成1000个100以内的数）

var
  i:longint;
begin
  assign(input,‘sss.in‘);
  assign(output,‘sss.out‘);
  reset(input);
  rewrite(output);

  randomize;
  for i:=1 to 1000 do
  write(random(100),‘ ‘);

  close(input);
  close(output);
end.

随机函数（Pascal入门）

标签：

原文地址：http://blog.csdn.net/boyxiejunboy/article/details/46927311