Майкл чуточку усложнил предыдущую задачу и попросил решить именно её. Мне же самому интересно стало и воспользовался предыдущей программой, чуточку изменив уравнение и ограничения. Результаты показаны в иллюстрации. Численно проверил несколько строк. Всё оказалось верным. Текст проги:
rem x^3+x*y-y=k
n=100
for k=1 to n
N=0
print "------------------------------"
print " k = ";:print k
print " N x y "
print "----------------"
for x=-n to n
for y=-n to n
z=x^3-x*y-y
if z=k then
if x*y<>0 then
N=N+1
print N using "###", x using "####";
print y using "####"
fi:fi
next y
next x
next k
21 октября 2023 г.
Сомнительный трюк. Ч 3
© Copyright: Георгий Александров, 2023
Свидетельство о публикации №223102101242
Свидетельство о публикации №223102101242
Рецензии