12 lines
237 B
Text
12 lines
237 B
Text
class Babbage {
|
|
function : Main(args : String[]) ~ Nil {
|
|
cur := 0;
|
|
do {
|
|
cur++;
|
|
}
|
|
while(cur * cur % 1000000 <> 269696);
|
|
|
|
cur_sqr := cur * cur;
|
|
"The square of {$cur} is {$cur_sqr}!"->PrintLine();
|
|
}
|
|
}
|