新しい問題

答えを見る／隠す

n: floor((random() * 90) + 5)
m: floor((random() * 90) + 5)
list1 = RemoveUndefined(Sequence[If[Mod[m, i] ≟ 0, i], i, 1, m])
list2 = RemoveUndefined(Sequence[If[Mod[n, i] ≟ 0, i], i, 1, n])
list3 = RemoveUndefined(Sequence[If[Mod[n, i] ≟ 0 ∧ Mod[m, i] ≟ 0, i], i, 1, n])
a = Max(list3)
text1: "" + (LaTeX[m]) + "の約数は" + (LaTeX[list1]) + ""
text2: "" + (LaTeX[n]) + "の約数は" + (LaTeX[list2]) + ""
text3: "" + (LaTeX[m]) + "，" + (LaTeX[n]) + "の公約数は" + (LaTeX[list3]) + ""
text4: "" + (LaTeX[m]) + "，" + (LaTeX[n]) + "の最大公約数は" + (LaTeX[a]) + ""
mode = 1