begin
  Range(1.0,2.0,10).Select(x->Rec(x,x*x)).Println(NewLine);
end.