RosettaCodeData/Task/Babbage-problem/BASIC256/babbage-problem.basic
2026-02-01 16:33:20 -08:00

7 lines
227 B
Text

#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