View Compilation Error

0_0_15235372_4093.cpp:2:22: error: too many decimal points in number
      f       : array[0..5000] of integer;
                      ^
0_0_15235372_4093.cpp:1:2: error: 'var' does not name a type
  var
  ^
0_0_15235372_4093.cpp:3:14: error: found ':' in nested-name-specifier, expected '::'
      ans     : integer;
              ^
0_0_15235372_4093.cpp:3:6: error: 'ans' does not name a type
      ans     : integer;
      ^
0_0_15235372_4093.cpp:4:2: error: 'procedure' does not name a type
  procedure work2();
  ^
0_0_15235372_4093.cpp:5:2: error: 'var' does not name a type
  var
  ^
0_0_15235372_4093.cpp:7:2: error: 'begin' does not name a type
  begin
  ^
0_0_15235372_4093.cpp:15:6: error: expected unqualified-id before 'for'
      for i:= 1 to m do
      ^
0_0_15235372_4093.cpp:18:2: error: 'end' does not name a type
  end;
  ^