我试图在Maple中创建一个简单的循环来排除正方形 以下是我的代码。我已经知道它不会起作用。因为while代码仅在n是正方形时运行,所以它永远不会打印。然后我想拿走除数的数量,但我对如何做到这一点非常有信心。我只需要一些东西给n作为一个不是正方形的随机整数。
n := rand(0 .. 100);
while n=1 or n=4 or n=9 or n=16 or n=25 or n=36 or n=49 or n=64 or n=81 or n=100 do
if n=1 or n=4 or n=9 or n=16 or n=25 or n=36 or n=49 or n=64 or n=81 or n=100 then
n := rand(0 .. 100); *(how do I send Maple back up to the start of the loop again?)*
end if;
print (n);
end do:
答案 0 :(得分:2)
请注意,通话rand(a..b)
不会生成随机数。相反,它会生成一个过程,该过程将在给定范围内生成随机数。你想要的是
R:= rand(2..99):
n:= R():
while isqrt(n)^2 = n do n:= R() end do:
n;