Visual foxpro 在VisualFoxPro中编写一个程序来检查一个数字是否为完美正方形

请用户输入一个数字。检查输入的数字是否为完全正方形。我试过了。

---

这听起来像是个家庭作业问题。是吗？是的。我试过了。该网站的规则是：“要求家庭作业帮助的问题必须包括到目前为止你为解决问题所做的工作的摘要，以及对你解决问题的困难的描述。”

local num, nSqrt
Input "Enter a number" to num
IF m.num > 0 
  nSqrt = SQRT(m.num)
  IF m.nSqrt == INT(m.nSqrt)
    ? LTRIM(STR(m.num)) + ' is a perfect square'
  ENDIF
endif