Напишите программу в Visual Foxpro, чтобы проверить число для идеального квадрата

Попросите пользователя ввести номер. Проверьте, является ли введенное число идеальным квадратом. Я старался. введите описание изображения здесь

Источник

1 ответ

Решение
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
Источник
Другие вопросы по тегам