View Compilation Error

0_0_14875147_5965.cpp:1:1: error: 'program' does not name a type
 program hdu2001;
 ^
0_0_14875147_5965.cpp:2:3: error: 'var' does not name a type
   var
   ^
0_0_14875147_5965.cpp:4:1: error: 'begin' does not name a type
 begin
 ^
0_0_14875147_5965.cpp:8:8: error: 'd' does not name a type
        d:=sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
        ^
0_0_14875147_5965.cpp:9:15: error: expected constructor, destructor, or type conversion before '(' token
        writeln(d:0:2);
               ^
0_0_14875147_5965.cpp:10:5: error: 'end' does not name a type
     end;
     ^
0_0_14875147_5965.cpp:11:1: error: 'end' does not name a type
 end.
 ^