1scale = 5
2for (a=1; a<500; a++) r=sqrt(a)
3r
4scale = 10
5for (a=1; a<500; a++) r=sqrt(a)
6r
7scale = 25
8for (a=1; a<500; a++) r=sqrt(a)
9r
10scale = 40
11for (a=1; a<500; a++) r=sqrt(a)
12r
13quit
14