0
已解决
高亮节
资深守护
资深守护
http://judge.codingtang.com/problem/2172/
var a,b,ans:integer; function gcd(a,b:integer):longint; begin if b=0 then gcd:=a else gcd:=gcd(b,a mod b ) ; end; begin read(a,b); ans:=(a*b) div gcd(a,b); writeln(ans); end.
递归大法错了!