Дано натуральное число. Проверить, является ли оно четвертой степенью некоторого натурального числа. Язык программирования: Паскаль
Дано натуральное число. Проверить, является ли оно четвертой степенью некоторого натурального числа. Язык программирования: Паскаль
Гость
Ответ(ы) на вопрос:
Гостьvar a:integer;
begin;
readln(a);
if frac(sqrt(sqrt(a)))=0 then writeln('Да') else writeln('Нет');
end.
Не нашли ответ?
Похожие вопросы