func main() var n: int :: cui@inputInt() var a: int :: cui@inputInt() var b: int :: cui@inputInt() var c: int :: cui@inputInt() var ans: int :: n / a + n / b + n / c do ans :- n / math@lcm(a, b) do ans :- n / math@lcm(b, c) do ans :- n / math@lcm(c, a) do ans :+ n / math@lcm(a, math@lcm(b, c)) do cui@print("\{ans}\n") end func