delphi7问题

我在delphi7中输入如下代码：
program Project1;{$APPTYPE CONSOLE}
var
  n1,n2,n3,n:integer;
uses
  SysUtils;begin  readln(n1,n2,n3);
  n:=n1;
  repeat
      if (n1 mod n=0) and (n2 mod n=0) and (n3 mod n=0) then
      break;
      n:=n-1;
      until n=1;
      writeln (n);
      readln;
end.
运行的时候问题出现在uses那里，问题为“Declaration expected but ‘USES’found”,但是删掉uses
  SysUtils;后程序变正常，请问高手是什么回事？