RosettaCodeData/Task/Babbage-problem/F-Sharp/babbage-problem-1.fs
2023-07-01 13:44:08 -04:00

4 lines
78 B
FSharp

let mutable n=1
while(((n*n)%( 1000000 ))<> 269696) do
n<-n+1
printf"%i"n