Получить наименьшее положительное n, при котором неравенство истинно
Решить на Pascal с помощью цикла с предусловием While
Приложения:

Ответы на вопрос
Ответил Helper211
0
Ответ:
var n: integer;
begin
n:=1;
while (n*n*n*n-(1500/n)<0) do
begin
n:= n+1;
end;
writeln('Наименьшее положительное n, при котором неравенство истинно: ',n);
end.
Если требовалось найти наименьшее вещественное положительное n, что вряд ли, то слово 'integer' заменяете на 'double' в первой строке, а в седьмой "n:= n+1;" заменяете на "n:=n+0.0001" с тем количеством нулей, которое будет соответствовать заданной точности.
Ответил Helper211
0
Потому что при n=1 неравенство ложно, а с увеличением n функция растет.
Новые вопросы