在 Visual Foxpro 中编写一个程序来检查一个数字的完美平方
Write a program in Visual Foxpro to check a number for perfect square
要求用户输入一个数字。检查输入的数字是否为正方形。我试过。
enter image description here
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
要求用户输入一个数字。检查输入的数字是否为正方形。我试过。 enter image description here
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