Какая ошибка содержится в записи a2d: h9? (ms excel 2010)

var

s,a,n,i,min,max: integer;

begin

min: =32767;

max: =-32768;

readln(n);

for i: =1 to n do

begin

readln(a);

if a< min then min: =a;

if a> max then max: =a;

end;

s: =(min+max)/2;

writeln(s);

end.

var

n: integer;

begin

readln(n);

if (n mod 10)=(n div 100) then

writeln('палиндром')

else

writeln('не палиндром');

end.

var i,n,s: nteger;

begin

  read(n);

  for i : = 1 to n do

      if i mod 2 = 0 then s: = s-1/i;

      else s: = s+1/i;

  writeln(s);

end.

1л=1дм^3

8л = 0.008 куб метров

5.68кг=0.00568 тон

плотность

0.00568/0.008=0.71 тон на кубометр

500*0.71 = 355 тон влезет в цистерну