View Compilation Error

0_0_15752364_14819.cpp:1:1: error: 'var' does not name a type
 var i,n,s1,s2,a:longint;
 ^
0_0_15752364_14819.cpp:2:1: error: 'begin' does not name a type
 begin
 ^
0_0_15752364_14819.cpp:4:6: error: expected unqualified-id before 'for'
      for i:=1 to n do
      ^
0_0_15752364_14819.cpp:7:12: error: 's1' does not name a type
            s1:=(a*(a+1)) mod (20090524*6);
            ^
0_0_15752364_14819.cpp:8:12: error: 's2' does not name a type
            s2:=(s1*(a+2)div 6) mod 20090524;
            ^
0_0_15752364_14819.cpp:9:19: error: expected constructor, destructor, or type conversion before '(' token
            writeln(s2);
                   ^
0_0_15752364_14819.cpp:10:6: error: 'end' does not name a type
      end;
      ^
0_0_15752364_14819.cpp:11:1: error: 'end' does not name a type
 end.
 ^