window 1

long i

for i = 1 to 1000000
  if i ^ 2 mod 1000000 == 269696 then exit for
next

print @"The smallest number whose square ends in 269696 is ";i
print @"Its square is ";i ^ 2

HandleEvents