После запуска Excel в окне документа появляется незаполненная

Рабочая книга.

Появляется Рабочая книга

вроде бы 100*100=10000 бит=1250 байта

var s,i,n,m : longint;

begin

  readln(m,n);

  if m> n then

  begin

      s: =m;

      m: =n;

      n: =s

  end;

  s: =0;

  for i: = m to n do if i mod 12=0 then s: =s+i;

  writeln(s);

end.