您所在位置：主题：初学者请教，简单问题
PscBeginner
[专家分：0] 发布于 2006-07-14 17:30:00
设计程序求一个最小正整数，使得它被3除余2，被7除余3，被11除余4
我的答案如下（有错）：
program xmod;
var x:integer;
begin
repeat
x:=x+1;
until x mod 3=2 and x mod 7=3 and x mod 11=4;
writeln('x=',x);
readln
end.
请前辈们指点一下
[em2][em3]
我的答案如下（有错）：
program xmod;
var x:integer;
begin
repeat
x:=x+1;
until x mod 3=2 and x mod 7=3 and x mod 11=4;
writeln('x=',x);
readln
end.
请前辈们指点一下
[em2][em3]
