pascal 错误 253
作者&投稿：从修 （若有异议请与网页底部的电邮联系）
额pascal 貌似没有253错误吧 在我这里搞出来是216 但这是小问题 你这么编肯定不行 开的数组就太大了 longint 是4字节 你的dist数组大小是500000*500000*4=1*10^12字节=931.3GB 这内存……有几只电脑吃得消 这样电脑会疯掉的 根本就不可能运行 所以楼主这个程序要懂大手术
哦,DOS版本的PASCAL,好古老啊
本人只用过delphi3~2009各个版本...
DOS版本的就不是很清楚了.
错误表：
运行错误是指程序运行时出现的错误，当发生时，Turbo Pascal显示如下信息：
RUNTIME ERROR NNNN AT XXXX：YYYY
其中，nnnn是运行错误代码，xxxx是错误发生的程序段，yyyy是错误地址偏移。
DOS 错误代码：
1无效DoS功能号
2文件末找到
3路径未找到
4打开文件过多
5禁止文件存取
6无效文件句柄
12无效文件存取代码
15无效驱动器号
16不能删除当前日录
17不能跨驱动器改文件名
I/O错误
100磁盘读错误
101磁盘写错误
102文件变量末赋值
103文件未打开
104文件未用输入方式打开
105文件末用输出方式打开
106无效数字格式
严重错误
150磁盘写保护
15l未知单元
152驱动器未准备好
153未知命令
154数据CRC校验错
155驱动器请求的结构长度错
156磁盘定位错
157未知媒介类型
158扇区末找到
159打印机缺纸
160设备写失败
161设备读失败
162硬件故障
致命错误
200被零除
20l范围检查错
202堆栈溢出错
203堆溢出错
204无效指针操作
205浮点上溢出
206浮点下溢出
207无效浮点运算
208未安装覆盖管理程序
209覆盖文件读错
210对象未初始化
2ll调用抽象方法
212流登计错
213集合下标越界
214集合溢出
215 算术上溢错误
216 存取非法
217 控制-C
218 授权指令
219 无效的TYPECAST
220 无效的变体TYPECAST
221 无效的变体操作
222 没有变体方法调用DISPATCHER
223 不能建立变体数组
224 变体不包含数组
225 变体数组边界错误
226 TLS初始化错误
Pascal编译错误对照表
下面列出在编译程序时可能出现的错误，在集成环境下，Turbo Pascal将自动加载源程序并定位于出错处。
l内存溢出
2缺标识符
3标识符未定义
4标识符重定义
5语法错误
6实型常量错
7整型常量错
8字符串常量跨行
9文件嵌套过多
10非正常文件结束
11行过长
12缺类型标识符
13打开文件过多
14无效文件名
15文件未找到
16磁盘满
17无效编译指示
18文件过多
19指针定义中未定义类型
20缺变量标识符
21类型错误
22结构过长
24文件分量不能为文件
25无效字符串长度
26类型不匹配
27无效子界基类型
28下界大于上界
29缺有序类型
30缺整型常数
31缺常数
32缺整型或实型常数
33缺指针类型标识符
34无效的函数结果类型
35缺标号标识符
36缺BEGIN
37缺END
38缺整型表达式
39缺有序表达式
40缺布尔表达式
41操作数类型与操作符不匹配
42表达式错
43非法赋值
44缺字段标识符
45目标文件过长
46未定义外部标识符
47无效*.OBJ文件记录
48代码段过长
49数据段过长
50缺DO
51无效PUBLIC定义
52无效EXTRN定义
53EXTRN定义过多
54缺0F
55缺INTERFACE
56无效重定位引用
57缺THEN
58缺T0或DOWNTO
59未定义的向前引用
60过程过多
61无效类型转换
62被零除D
63无效文件类型
64不能读写该类型的变量
65缺指针变量
66缺字符串变量
67缺字符串表达式
68单元循环引用
69单元名不匹配
70单元版本不匹配
71单元重名
72单元文件格式错误
73缺IMPLEMENTATl0N
74常数与CASE类型不相匹配
75缺记录变量
76常数越界
77缺文件变量
78缺指针变量
79缺整型或实型表达式
80标号不在当前块中
81标号已定义
82标号未定义
83无效参数
84缺UNIT
85缺“；”
86缺“：”
87缺“，”
88缺“(”
89缺“)”
90缺“＝”
91缺“：＝”
92缺“[”或“(．”
93缺“]”或“．)”
94缺“．”
96变量过多
97无效FOR控制变量
98缺整型变量
99此处不允许用文件和
100字符串长度不匹配
101无效字顺序
102缺字符串常数
103缺整型或实型变量
104缺有序变量
105INLINE错
106缺字符表达式
107重定位项过多
112CASE常量越界
113语句错
114不能调用中断过程
116必须在8087方式下编译
117末找到目标地址
118此处不允许包含文件
120缺NIL
121无效限定符
122无效变量引用
123符号过多
124语句部分过长
126文件必须为变量参数
127条件符号过多
128条件指令错位
130初始条件定义错
13l过程和函数头与前面定义的不匹酉
132严重磁盘错误
133不能计算该表达式
134表达式错误结束
l35无效格式说明符
136无效间接引用
137此处不允许结构变量
138无SYSTEM单元不能计算
l39不能存取该符号
140无效浮点运算
141不能将覆盖编译至内存
142缺过程和函数变量
143无效过程或函数引用
144不能覆盖该单元
147缺对象类型
148不允许局部对象类型
149缺VIRTUAL
150缺方法标识符
151不允许虚拟构造方法
152缺构造方法标识符
153缺释放方法标识符
154FAIL只允许在构造方法内使用
155无效的操作符和操作数组合
156缺内存引用
l57不能加减可重定位符号
158无效寄存器组合
159未激活286／287指令
160无效符号引用
161代码生成错
162缺ASM
转自DRS
253不是PASCAL的错误代码，是你的程序执行的退出代码，比如你程序里面最后一个语句是：
HALT(253);
就会产生这样的效果。
Free Pascal错误一览表
1.Out of memory [内存溢出]
2.Identifier expected [缺标识符]
3.Identifier not found [标识符未找到]*
如：Identifier not found INTEGR [标识符INTEGER未找到]
4.Duplicate identifier [重复说明]*
如：Duplicate identifier N [变量N重复说明]
5.Syntax error [语法错误]*
6.Error in real constant [实型常量错]
7.Error in integer constant [整型常量错]
8.String constant exceeds line [字符串常量跨行]
9.Too many nested file [文件嵌套过多]
10.Unexpected end of file [非正常文件结束]
11.Line to long [行过长]
12.Type Identifier expected [缺类型标识符]
13.Too many open file [打开文件过多]
14.Invalid file name [无效文件名]
15.File not found [文件未找到]*
16.Disk full [磁盘满]
17.Invalid compiler directive [无效编译指示]
18.Too many file [文件过多]
19.Undefined type in pointer definition [指针定义中未定义类型]
20.Variable identifier expected [缺变量标识符]
21.Error in type definition [类型错误说明]*
22.Stucture too large [结构过长]
23.Set base type out of range [集合基类型越界]
24.File components may not be files or object [FILE分量不能为文件或对象]
25.Invalid string length [无效字符串长度]
26.Type mismatch [类型不匹配]*
27.Invalid subrange base type [无效子界基类型]
28.Lower bound greater than upper bound [下界大于上界]
29.Ordinal type expected [缺有序类型]
30.Integer constant expected [缺整型常数]
31.Constant expected [缺常量]
32.Integer or real constant expected [缺整型或实型常量]
33.Pointe type identifier expected [缺指针类型标识符]
34.Invalid function result type [无效的函数结果类型]
35.Label identifier expected [缺标号标识符]
36.Begin expected [缺BEGIN]*
37.End expected [缺END]*
38.Integer expression expected [缺整型表达式]
39.Ordinal expression expected [缺有序表达式]
40.Boolean expression expected [缺布尔表达式]
41.Operand type do not match operator [操作数与操作符不匹配]
42.Error in expression [表达式错]
43.Illegal expression [非法赋值]*
44.Field identifier expected [缺域标识符]
45.Object file too large [目标文件过大]
46.Undefined external [未定义外部标识符]
47.Invalid object file record [无效OBJ文件记录]
48.Code segment too large [代码段过长]
49.Data segment too large [数据段过长]*
50.Do expected [缺DO]*
51.Invalid PUBLIC definition [无效PUBLIC定义]
52.Invalid EXTRN definition [无效EXTRN定义]
53.Too many EXTRN definition [EXTRN定义过多]
54.Of extected [缺0F]*
55.INTERFACE expected [缺INTERFACE]
56.Invalid relocatable reference [无效重定位引用]
57.THEN expected [缺THEN]*
58.TO （DOWNTO） expected [缺T0或DOWNTO]*
59.Undefined forward [提前引用未定义的说明]
60.Too many procedures [过程过多]
61.Invalid typecast [无效类型转换]
62.Division by zero [被零除]
63.Invalid typecast [无效文件类型]
64.Cannot Read or Write variable of this type [不能读写该类型的变量]*
65.Ponter variable expected [缺指针变量]
66.String variable expected [缺字符串变量]
67.String expression expected [缺字符串表达式]
68.Circular unit reference [单元循环引用]
69.Unit name mismatchg [单元名不匹配]
70.Unit version mismatch [单元版本不匹配]
71.Duplicate unit name [单元重名]
72.Unit file format error [单元文件格式错误]
73.Implementation expected [缺IMPLEMENTATl0N]
74.constant and case types do not match [常数与CASE类型不相匹配]
75.Record variable expected [缺记录变量]
76.Constant out of range [常量越界]
77.File variable expected [缺文件变量]
78.Pointer extression expected [缺指针变量]
79.Integer or real expression expected [缺整型或实型表达式]
80.Lable not within current block [标号不在当前块中]
81.Lable already defined [标号已定义]
82.Undefined lable in preceding statement part [在前面语句中标号未定义]
83.Invalid @ argument [无效的@参数]
84.Unit expected [缺UNIT]
85. “；” expected [缺“；”]*
86. “：” expected [缺“：”]*
87. “，” expected [缺“，”]*
88. “（” expected [缺“(”)*
89. “）” expected [缺“]” ]*
90. “=” expected [缺“＝”]*
91. “：=” expected [缺“：＝”]*
92. “[” or “(” expected [缺“[”或“(”)*
93. “]” or “)” expected [缺“]”或“)”]*
94. “.．” expected [缺“．”]*
95. “．．” expected [缺“．．”]*
96.Too many variable [变量过多]
97.Invalid FOR control variable [无效FOR控制变量]
98.Integer variable expected [缺整型变量]
99.File and procedure types are not allowed here [此处不允许用文件和过程类型]
100.Srting length mismatch [字符串长度不匹配]
101.Invalid ordering of fields [无效域顺序]
102.String constant expected [缺字符串常量]
103.Integer or real variable expected [缺整型或实型变量]
104.Ordinal variable expected [缺顺序变量]
105.INLINE error [INLINE错]
106.Character expression expected [缺字符表达式]
107.Too many relocation items [重定位项过多]
112.Case constant out of range [CASE常量越界]
113.Error in statement [语句错]
114.Can’t call an interrupt procedute [不能调用中断过程]
116.Must be in 8087 mode to complie this [必须在8087方式下编译]
117.Target address not found [未找到目标地址]
118.Include files are not allowed here [此处不允许包含INCLUDE文件]
120.NIL expected [缺NIL]
121.Invalid qualifier [无效限定符]
122.Invalid variable reference [无效变量引用]
123.Too many symbols [符号过多]
124.Statement part too large [语句部分过长]
126.Files must be var parameters [文件必须为变量参数]
127.Too many conditional directive [条件符号过多]
128.Misplaced conditional directive [条件指令错位]
129.ENDIF directive missing [缺少ENDIF 指令]
130.Error in initial conditional defines [初始条件定义错]
131.Header does not match previous definition [过程和函数头与前面定义的不匹配]
132.Critical disk error [严重磁盘错误]
133.Can’t evalute this expression [不能计算该表达式]*
如：Can’t evalute constart expression [不能计算该常量表达式]
134.Expression incorrectly terminated [表达式错误结束]
135.Invaild format specifier [无效格式说明符]
136.Invalid indirect reference [无效间接引用]
137.Structed variable are not allowed here [此处不允许结构变量]
138.Can’t evalute without system unit [无SYSTEM单元不能计算]
139.Can’t access this symbols [不能存取该符号]
140.Invalid floating –point operation [无效浮点运算]
141.Can’t compile overlays to memory [不能将覆盖模块编译至内存]
142.Procedure or function variable expected [缺过程和函数变量]
143.Invalid procedure or function reference. [无效过程或函数引用]
144.Can’t overlay this unit [不能覆盖该单元]
147.Object type expected [缺对象类型]
148.Local object types are not allowed [不允许局部对象类型]
149.VIRTUAL expected [缺VIRTUAL]
150.Method identifier expected [缺方法标识符]
151.Virtual constructor are not allowed [不允许虚拟构造方法]
152.Constructor Identifier expected [缺构造函数标识符]
153.Destructor Identifier expected [缺析构函数标识符]
154.Fail only allowed within constructors [FAIL标准过程只允许在构造方法内使用]
155.Invalid combination of opcode and operands [无效的操作符和操作数组合]
156.Memory reference expected [缺内存引用]
157.Can’t add or subtrace relocatable symbols [不能加减可重定位符号]
158.Invalid register combination [无效寄存器组合]
159.286/287 Instructions are not enabled [未激活286／287指令]
160.Invalid symbol reference [无效符号引用]
161.Code generation error [代码生成错]
162.ASM expected [缺ASM]
二、运行错误
运行错误将显示错误信息,并终止程序的运行。
Run time error *** at XXXX:YYYY
其中***是运行错误号，运行时的错误分为以下四类：错误号为1~99是DOS错误；
100~149是输入输出错误；150~199是严重错误；200~255是致命错误。
XXXX:YYYY是错误地址，形式为段地址:偏移量。
1 Invalid function number [无效函数号]
2 File not found [文件未找到]
3 Path not found [路径未找到]
4 Too many open files [打开文件过多]
5 File access denied [禁止文件存取]
6 Invalid file handle [无效文件句柄]
12 Invalid file access code [无效文件存取代码]
15 Invalid drive number [无效驱动器号]
16 Cannot remove current directory [不能删除当前目录]
17 Cannot rename across drives [不能跨驱动器改文件名]
100 Disk read error [磁盘读错误]
101 Disk write error [磁盘写错误]
102 File not assigned [文件变量未赋值]
103 File not open [文件未打开]
104 File not open for input [文件未用输入方式打开]
105 File not open for output [文件未用输出方式打开]
106 Invalid numeric format [无效数字格式]
150 Disk is write-protected [磁盘写保护]
151 Unknown unit [未知单元]*
152 Drive not ready [驱动器未准备好]
154 CRC error in data [数据CRC校验错]
155 Bad drive request struct length [不良驱动器请求结构长度]
156 Disk seek error [磁盘定位错]
157 Unknown media type [未知媒介类型]
158 Sector Not Found [扇区未找到]
159 Printer out of paper [打印机缺纸]
160 Device write fault [设备写失败]
161 Device read fault [设备读失败]
162 Hardware failure [硬件故障]
200 Division by zero [以零做除数]
201 Range check error [范围检查错]
202 Stack overflow error [堆栈溢出错]
203 Heap overflow error [堆溢出错]
204 Invalid pointer operation [无效指针操作]
205 Floating point overflow [浮点上溢出]
206 Floating point underflow [浮点下溢出]
207 Invalid floating point operation [无效浮点运算]
208 Overlay manager not installed [没有安装覆盖管理程序]
209 Overlay file read error [读取覆盖文件时错误]
210 Object not initialized [对象未初始化]
211 Call to abstract method [调用抽象方法]
212 Stream registration error [流登计错]
213 Collection index out of range [集合下标越界]
214 Collection overflow error [集合溢出]
215 数字超出范围
216 General Protection fault [存取非法]
217 Unhandled expetion occurred [控制-C]
看得不是很清楚,好像也没什么错
是要求有多少个素数吗?下面的是按你程序来编的,运行过了,没错
var i,j:integer;
f:array[1..100000] of boolean;
begin
fillchar(f,sizeof(f),false);
for i:=2 to trunc(sqrt(100000)) do
begin
if not f[i] then
begin
j:=2;
while (i*j<100000) do begin f[i*j]:=true;inc(j); end;
end;
end;
k:=0;
for i:=2 to 100000 do if not f[i] then inc(k);
writeln(k);
end.
你把数组定小点挖..
类胁丙氨： 额 pascal 貌似没有253错误吧 在我这里搞出来是216 但这是小问题 你这么编肯定不行 开的数组就太大了 longint 是4字节 你的dist数组大小是500000*500000*4=1*10^12字节=931.3GB 这内存……有几只电脑吃得消 这样电脑会疯掉的 根本就不可能运行 所以楼主这个程序要懂大手术
昌都地区17217526553： pascal 语言常见错误 - ？
类胁丙氨： 您好 很高兴为您解答附上Pascsal 常见 错误表 Pascal运行错误对照表运行错误是指程序运行时出现的错误,当发生时,Turbo Pascal显示如下信息: RUNTIME ERROR NNNN AT XXXX:YYYY 其中,nnnn是运行错误代码,xxxx是错...
昌都地区17217526553： Free Pascal没有错误提示,怎么办? - ？
类胁丙氨： 编译错误有提示 运行错误也有提示 没提示说明你对了 代码看不懂,看下面错误代码及错误信息 错误释义 error 1: Out of memory 内存溢出 error 2: Identifier expected 缺标识符 erro...
昌都地区17217526553： free pascal中goto语句能从过程中直接跳到主程序吗?若不能有何简便语句可以代替??？
类胁丙氨： 不可以的 只能在内部跳转 你可以使用return
昌都地区17217526553： 设备更新问题 pascal - ？
类胁丙氨： dp[i]表示第i年,最优值 dp[i]=min{dp[j]+fix[i-j] 1<=j<i} fix[k]表示使用k年需要的维修费用 以上这种方法是错误的.
昌都地区17217526553： pascal运行错误 - ？
类胁丙氨： 因为你读入完a、b的值之后还没有求出c的值就输出了……应该先写c:=a+b;再writeln(c);
昌都地区17217526553： 谁能帮我看看这个那里错了(pascal) - ？
类胁丙氨： 第五行 n既然是字符串类型 就因该用 readln 第十七行 x没有大写 还有 建议在最后加一个 writeln; 当然不加应该也没什么问题
昌都地区17217526553： pascal问题 - ？
类胁丙氨： 1、(即斐波那契数列) program Q_1; var a1,a2,a3,t,i,x:longint; Begin readln(x); a1:=1; a2:=0; a3:=1; repeat writeln(a1); a1:= a2 + a3 ; t;=a1; a2:=a3; a3:=t; i:=i+1; until i=x ; readln; readln; End.2、 program Q_2; var i,a:integer; Begin for a:= 101 to ...
昌都地区17217526553： pascal 现在有一个数列:0,1,3,8,21,55,144······,请编程求出数列中第2010个数除以6的余数是 - ？
类胁丙氨： 楼主,思路是这样的:这个数列是斐波那契数列的子列,原来的斐波那契数列的通项公式是:a[n]=a[n-1]+a[n-2]...
