PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018
Внимание! Если программа не работает, обновите версию!
begin
var a := ArrRandomReal(15, 2, 3 - 1e-15);
a.Select(t -> Round(t, 3)).Println
end.
2.777 2.692 2.943 2.469 2.085 2.212 2.522 2.286 2.255 2.602 2.898 2.178 2.677 2.826 2.664