foo.cc:3:13: error: too many decimal points in number
    3 | var t:array[1..4]of extended;
      |             ^~~~
foo.cc:1:1: error: 'function' does not name a type; did you mean 'union'?
    1 | function mindis(x,y:extended):extended;
      | ^~~~~~~~
      | union
foo.cc:3:1: error: 'var' does not name a type
    3 | var t:array[1..4]of extended;
      | ^~~
foo.cc:5:1: error: 'midx' does not name a type
    5 | midx,midy:extended;
      | ^~~~
foo.cc:7:1: error: 'begin' does not name a type
    7 | begin
      | ^~~~~
foo.cc:11:1: error: expected unqualified-id before 'while'
   11 | while abs(t[1]-t[3])+abs(t[2]-t[4])>1E-5 do
      | ^~~~~
foo.cc:17:1: error: 'midy' does not name a type
   17 | midy:=(t[2]+t[4])/2;
      | ^~~~
foo.cc:19:1: error: expected unqualified-id before 'if'
   19 | if getdis(t[1],t[2],x,y)1E-5 do
      | ^~
foo.cc:25:1: error: 'midy' does not name a type
   25 | midy:=(line[1,2]+line[1,4])/2;
      | ^~~~
foo.cc:27:1: error: expected unqualified-id before 'if'
   27 | if mindis(line[1,1],line[1,2])
      | ^~

[Hydro](https://hydro.ac)提供评测服务