my ($A,$B)=split(' ',get);say ($A+$B)gcd($A*$B)