ПаскальНайти все натуральные решения уравнения:x^3+y^3=M . Где М больше 0 задает пользователь. Использовать вложенные циклы.
Паскаль
Найти все натуральные
решения уравнения:x^3+y^3=M . Где М>0 задает
пользователь. Использовать вложенные циклы.
Гость
Ответ(ы) на вопрос:
Гостьvar
M, y, x, i, j: integer;
begin
readln(m);
writeln('X':5, 'Y':5);
for i := 0 to M do
for j := 0 to M do
if (power(i, 3) + power(j, 3) = M) then
writeln(i:5, j:5);
end.
Не нашли ответ?
Похожие вопросы