读书人

delphi7有关问题

发布时间: 2012-05-28 17:59:33 作者: rapoo

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;后程序变正常,请问高手是什么回事?

[解决办法]
把var段和Uses段的位置交换一下
[解决办法]
先熟悉语法,每个语言都有自己的规则

读书人网 >.NET

热点推荐