Free Pascal Compiler version 3.0.0+dfsg-2 [2016/01/28] for x86_64
Copyright (c) 1993-2015 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling foo.pas
foo.pas(16,4) Error: Identifier not found "os"
foo.pas(36,4) Error: Incompatible types: got "SmallInt" expected "Array[1..20] Of Array[0..100] Of LongInt"
foo.pas(46,5) Error: Operator is not overloaded: "Array[0..20] Of Array[0..200] Of Array[0..200] Of Array[1..2] Of LongInt" = "ShortInt"
foo.pas(48,7) Error: Identifier not found "max"
foo.pas(48,17) Error: Operator is not overloaded: "LongInt" + "Array[1..20] Of Array[0..100] Of LongInt"
foo.pas(64,7) Error: Can't read or write variables of this type
foo.pas(72,4) Error: Incompatible types: got "ShortInt" expected "Array[0..20] Of Array[0..200] Of Array[0..200] Of Array[1..2] Of LongInt"
foo.pas(72,9) Error: Incompatible types: got "ShortInt" expected "Array[0..20] Of Array[0..200] Of Array[0..200] Of Array[1..2] Of LongInt"
foo.pas(86,10) Warning: Variable "a" does not seem to be initialized
foo.pas(86,11) Error: Operator is not overloaded: "Array[1..200] Of Array[1..4] Of LongInt" * "Int64"
foo.pas(90,11) Error: Operator is not overloaded: "Array[1..200] Of Array[1..4] Of LongInt" * "Int64"
foo.pas(100,11) Error: Incompatible type for arg no. 2: Got "Array[0..20] Of Array[0..200] Of Array[0..200] Of Array[1..2] Of LongInt", expected "LongInt"
foo.pas(104,23) Error: Operator is not overloaded: "LongInt" > "Array[0..20] Of Array[0..200] Of Array[0..200] Of Array[1..2] Of LongInt"
foo.pas(104,35) Error: Incompatible types: got "Array[0..20] Of Array[0..200] Of Array[0..200] Of Array[1..2] Of LongInt" expected "LongInt"
foo.pas(110,4) Fatal: There were 13 errors compiling module, stopping
Fatal: Compilation aborted
Error: /usr/bin/ppcx64 returned an error exitcode

自豪的采用 HydroJudger 进行评测(github.com/hydro-dev/HydroJudger)