Question

pascal runtime error怎么解决

杨辉三角形
1
1 1
1 2 1
1 3 3 1
var
a:array[1..100000,1..100000]of longint;
i,j,n:longint;
begin
read(n);
a[1,1]:=1;
for i:=2 to n do
begin
a[i,1]:=1; a[i,i]:=1;
for j:=2 to i-1 do
a[i,j]:=a[i-1,j-1]+a[i-1,j];
end;
for i:=1 to n do
begin
for j:=1 to i do
write(a[i,j],' ');
writeln;
end;
end.

结果是exitcode=216

Answer 1

a:array[1..100000,1..100000]of longint
这里错了 数组开小一点 1000就够了 内存爆了

还有 n的范围是多少
如果n大于太大 平方大于10的8次方 就会超时

Answer 2

216指的是你的数据类型或范围出了问题
也就是你数组开大了
若还有问题可追问

Answer 3

数组过大
exitcode=216 非法存取

Answer 4

光看数组就开大了。。。。。。。