最新帖子 精华区 社区服务 会员列表 统计排行
  • 3418阅读
  • 3回复

为什么??????????

楼层直达
为什么结果是
TASK: test
LANG: PASCAL

Compiling...
Compile: OK

Executing...
Execution error: Your program (`test') exited with exit status `2'
when presented with test case 1, shown below.

Your program's exit status might indicate Pascal Runtime Error 2. Here
is the message for that Runtime Error:
File not found: You can get this error when you tried to do an
operation on a file which doesn't exist.


----- Test Case 1 ------
1 1
----------------------------

Your program printed data to stdout. Here is the data:
-------------------
Runtime_error_2_at_$08048108__$08048108

-------------------
Run time error 2: File not found: You can get this error when you
tried to do an operation on a file which doesn't exist.
-------------------
Full Test Data   Full Answer----------------------------
Read this if your program works on your computer but not the grader. Do not write a letter to the coaches until you have tried these techniques!

Thanks for your submission!

只看该作者 1  发表于: 2006-06-02
我的程序是(第一题的)
program ride;
var input,out:text;
  ch:char;
  s1,s2:longint;
begin
assign(input,'ride.in');
assign(output,'ride.out');
reset(input);
rewrite(output);
read(input,ch);
s1:=1;
s2:=1;
while ch in['A'..'Z'] do
begin
s1:=s1*(ord(ch)-64);
read(input,ch);
end;
while ch in [' ',#13,#10] do
read(input,ch);
while ch in['A'..'Z'] do
begin
s2:=s2*(ord(ch)-64);
read(input,ch);
end;
if s1 mod 47=s2 mod 47 then writeln(output,'GO')
else writeln(output,'STAY');
close(input);
close(output);
end.
级别: 管理员

只看该作者 2  发表于: 2006-06-08
USACO使用的是Free Pascal编译器,在该编译器中,out是保留字
级别: 管理员

只看该作者 3  发表于: 2006-06-08
我刚才把你的程序上传了,通过!
快速回复

限100 字节
 
上一个 下一个