program Multiplos; var i, j, multi, multj, n: integer; begin readln(N, i, j); multi := 0; multj := 0; while n <> 0 do begin if multi < multj then begin write(multi); multi := multi + i end else if multj < multi then begin write(multj); multj := multj + j end else begin write(multi); multi := multi + i; multj := multj + j end n := n - 1 end end.