Question

用一个数去除30,45,60都正好整除,这个数最大是多少?

Answer 1

15
就是求三个数的最大公约数．
pascal 求最大公约数程序：
function gcd(x,y:longint):longint;
begin
if x mod y=0 then gcd:=y else gcd:=gcd(y,x mod y);
end;
只要前两个求最大公约数的结果与第三个数再求最大公约数即可．