RosettaCodeData/Task/Babbage-problem/BASIC256/babbage-problem.basic

8 lines
224 B
Plaintext

#This code is an implementation of Babbage Problem
number = 2
DO
number += 2
UNTIL ((number^2) % 1000000) = 269696
PRINT "The smallest number whose square ends in 269696 is: "; number
PRINT "It's square is "; number*number