Программа определяет, является ли число N...
Программа определяет, является ли число N, меньшее, чем число M, третьей степенью какого-либо числа.
При вводе кубов 1, 2, 3 и 5 выводится YES, но кубы остальных чисел не определяются (NO)
В чем может быть проблема?
Answers & Comments
var n,m,b: word;
begin
readln(m,n);
if n<m then
begin
b:=round(power(n,1/3));
if round(exp(ln(b)*3)) = n then writeln(true) else writeln(false);
end
else write('error');
end.
Вроде правильно выводит