/in/foo.cc:1:1: error: 'var' does not name a type
 var n:longint;begin writeln(random(n*n)+1);end.
 ^~~
/in/foo.cc:1:15: error: 'begin' does not name a type
 var n:longint;begin writeln(random(n*n)+1);end.
               ^~~~~
/in/foo.cc:1:44: error: 'end' does not name a type
 var n:longint;begin writeln(random(n*n)+1);end.
                                            ^~~