Паскаль

Найти все натуральные

решения уравнения:x^3+y^3=M. Где М>0 задает

пользователь. Использовать вложенные циклы.

Question

Информатика

Артюша

16 июля, 15:28

Паскаль

Найти все натуральные

решения уравнения:x^3+y^3=M. Где М>0 задает

пользователь. Использовать вложенные циклы.

+1

Ответы (1)

Знаете ответ?

Фавстина · Answer 1

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.

ПаскальНайти все натуральныерешения уравнения:x^3+y^3=M. Где М>0 задаетпользователь. Использовать вложенные циклы.

Паскаль

Найти все натуральные

решения уравнения:x^3+y^3=M. Где М>0 задает

пользователь. Использовать вложенные циклы.