Question

出现了一个问题unit1.pas(1,1) Fatal: Syntax error, "UNIT" expected but "VAR" found 求解惑

var
x,y,i,m,n:integer;
a:array[1..500]of char;
b:array[1..2000]of integer;
begin
assign(input,'C:\Users\lenovo\Desktop\123\123.in');
reset;
assign(output, 'C:\Users\lenovo\Desktop\123\123.out');
rewrite;
x:=500;
y:=1;
randomize；
for i:=1 to x do
read(a[x]);
for i:=1 to 2*x do
begin m:=random(x+1);
n:=randon(x+1);
c:=a[b];
a[b]:=a[a];
a[a]:=c;
b[y]:=m;b[y+1]:=n;y:=y+2;
end;
for i:=1 to 500 do
write(a[i]);
for i:=1 to 2000 do
write(b[i]);
close(input);
close(output);
end;

Answer 1

第一行要么不打 程序名
要么就得打 program xxx;
而不能直接打 xxx;

追问

那是变量说明 啊