x=int(999/83)+1
for i=x to 10000/83
y=i*83
z=0
for j=1 to 4
z=z+cint(mid(y,j,1))
next
if i=z then 输出y值