RosettaCodeData/Task/Babbage-problem/Aime/babbage-problem.aime

integer i;

i = sqrt(269696);
while (i * i % 1000000 != 269696) {
    i += 1;
}

o_(i, "\n");