Question

Free Pascal语言中，randomize是什么意思？那种语言编写的程序如何输出中文？

那种语言编写的程序如何输出中文？

Answer 1

randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面.
一.数学函数：
Inc(i) 使i:=i+1;
Inc(I,b) 使I:=I+b;
dec(i) 使i:=i-1;
dec(I,b) 使I:=I-b;
Abs(x) 求x的绝对值 例：abs(-3)=3
Chr(x) 求编号x对应的字符。例：Chr(65)=’A’ chr(97)=’a’ chr(48)=’0’
Ord(x) 求字符x对应的编号。例:ord(‘A’)=65 ord(‘a’)=97 另外：ord(false)=0 ord(true)=1
Sqr(x) 求x的平方。 例：sqr(4)=16
Sqrt(x)求x的开方. 例：sqrt(16)=4
round(x) 求x的四舍五入 例：round(4.5)=5
trunc(x) 求x的整数部分 例：trunc(5.6)=5 结果是integer型
int(x) 求x的整数部分 例int(5.6)=5.0 结果是real型
frac (x)求x的小数部分 例 frac(5.6)=0.6
pred(x) 求x的前导 pred(‘b’)=’a’ pred(5)=4 pred(true)=false
succ(x) 求x的后继 succ(‘b’)=’c’ succ(5)=6 succ(false)=true
odd(x) 判断x是否为奇数。如果是值为true，反之值为false. Odd(2)=false odd(5)=true
power(a,n) 求a的n次方 power(2,3)=8 {只有在开启math库时才可以使用}
random 取0~1之间的随机数（不能取到1）
randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面.
Fillchar(a,size(a),0) 数组初始化，即把数组a的值全部置为0 {赋成布尔型变量也可以}
SHR: x SHR n 把x换成二进制后向右移n位，相当于 把x 除以 2n
SHL: x SHL n把x换成二进制后向左移n位，相当于 把x 乘以 2n

Answer 2

初始化随机函数发生器:randomize
你可以用TURBO PASCAL汉化版,可以在外面用记事本打出中文,然后再编写环境里可以看出中文,而不是乱码

Answer 3

randomize的作用是使每次运行程序时，产生不同的随机数。

Answer 4

函数名: randomize
功 能: 初始化随机数发生器
适用语言;BASIC,VISUAL BASIC,C,C++等
用 法: void randomize(void);
程序例:
#include
#include
#include
int main(void)
{
int i;
randomize();
printf("Ten random numbers from 0 to 99\n\n");
for(i=0; i<10; i++)
printf("%d\n", rand() % 100);
return 0;
}

Answer 5

var d,j,i,m:integer;
a:array[1..10,1..10] of integer;
begin
i:=1; j:=1; m:=1; d:=1;
repeat
a[i,j]:=m;
case d of
1: begin i:=i+1; if j=1 then d:=2 else d:=4; end;
2: begin i:=i-1; j:=j+1; if j=n then d:=1 else if i=1 then d:=3; end;
3: begin j:=j+1; if i=n then d:=2 else d:=4; end;
4: begin i:=i+1; j:=j-1;
if i=n then d:=3 else if j=1 then d;=1; end;
end;
m:=m+1;
until m>sqr(n);
for i:=1 to n do
begin
for j:=1 to n do write(a[i,j]:4);
writeln;
end;
end.
我是自己现编的，没调试，可能有错误，但主架一定是对的。 randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面.
一.数学函数：