begin
var a := SeqRandomReal(20, -99, 99)
.Select(t -> Round(t, 1)).ToArray;
a.Println;
Swap(a[4], a[9]);
a.Println
end.
