open System

[<EntryPoint>]
let main argv =
    let input = Console.ReadLine().Split(' ') |> Array.map int64
    let a, b = input.[0], input.[1]
    let rec gcd (x : int64) (y : int64) =
        if x < y then
            gcd y x
        else if x % y = 0L then
            y
        else
            gcd y (x % y)
    printfn "%d" (a * b / (gcd a b))
    0
