I have a feeling there are complex numbers afoot, but
I could not find a set with integer real and imaginary parts.
the following yields no answer:
program fff
implicit none
complex a,b,c,m,z2,z3,z4,z5,c3
real ra,rb
integer ira,irb,ia,ib
c3=complex(3.,0.)
do ira=-150,150
ra=ira
do irb=-150,150
rb=irb
do ia=-150,150
do 2 ib=-150,150
a=complex(ra,1.*ia)
b=complex(rb,1.*ib)
c=c3-a-b
z2=a**2+b**2+c**2
if(aimag(z2).ne.0)go to 2
z3=a**3+b**3+c**3
if(aimag(z3).ne.0)go to 2
z4=a**4+b**4+c**4
if(aimag(z4).ne.0)go to 2
z5=a**5+b**5+c**5
if(real(z2).ge.10)go to 2
if(real(z3).ne.15)go to 2
if(real(z4).ne.35)go to 2
m = a**5+b**5+c**5
print*,m
2 enddo
enddo
enddo
enddo
end
Edited on February 28, 2019, 5:12 pm