Free Pascal Compiler version 3.0.0 [2015/11/16] for i386
Copyright (c) 1993-2015 by Florian Klaempfl and others
Target OS: Win32 for i386
Compiling foo.pas
Linking foo.exe
16 lines compiled, 0.0 sec, 27792 bytes code, 1268 bytes data

测试数据 #0: Accepted, time = 0 ms, mem = 992 KiB, score = 10

测试数据 #1: Accepted, time = 0 ms, mem = 992 KiB, score = 10

测试数据 #2: Accepted, time = 15 ms, mem = 992 KiB, score = 10

测试数据 #3: Accepted, time = 0 ms, mem = 988 KiB, score = 10

测试数据 #4: Accepted, time = 0 ms, mem = 988 KiB, score = 10

测试数据 #5: Accepted, time = 0 ms, mem = 988 KiB, score = 10

测试数据 #6: Accepted, time = 0 ms, mem = 988 KiB, score = 10

测试数据 #7: Accepted, time = 0 ms, mem = 988 KiB, score = 10

测试数据 #8: Accepted, time = 0 ms, mem = 992 KiB, score = 10

测试数据 #9: Accepted, time = 0 ms, mem = 988 KiB, score = 10

Accepted, time = 15 ms, mem = 992 KiB, score = 100
AC代码:
var
a:integer;
begin
randomize;
a:=random(3);
write(a);
end.
经常带老奶奶过马路的人可以试一下