/in/foo.cc:1:1: error: 'var' does not name a type
 var a,b,c,d:real;
 ^~~
/in/foo.cc:2:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:4:1: error: 'b' does not name a type
 b:=sqrt(b);
 ^
/in/foo.cc:5:1: error: 'd' does not name a type
 d:=sqrt(d);
 ^
/in/foo.cc:6:6: error: expected constructor, destructor, or type conversion before '(' token
 write(sqrt(sqr(b+d)+sqr(c-a)):0:3);
      ^
/in/foo.cc:7:1: error: 'end' does not name a type
 end.
 ^~~