Euler 206

{

n = 1010101030;
n2 = n*n;

while(n<1389026571,

    d=digits(n2);
    if(d[3]==2 && d[5]==3 && d[7]==4 && d[9]==5 && d[11]==6 && d[13]==7 && d[15]==8 && d[17]==9 && d[19]==0,break);

    n+=40;
    n2+=80*n-1600;

    d=digits(n2);
    if(d[3]==2 && d[5]==3 && d[7]==4 && d[9]==5 && d[11]==6 && d[13]==7 && d[15]==8 && d[17]==9 && d[19]==0,break);

    n+=60;
    n2+=120*n-3600;

);

print(n,", ",n2);

}