administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

MatrRandomReal digits

Browse source
This commit is contained in:
Mikhalkovich Stanislav 2023-09-21 11:12:57 +03:00
parent ddd5cb862a
commit 7b9f968669
2 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
bin/Lib/PABCSystem.pas
View file

@ -2406,7 +2406,7 @@ function MatrRandom(m: integer := 5; n: integer := 5; a: integer := 0; b: intege
/// Возвращает двумерный массив размера m x n, заполненный случайными целыми значениями
function MatrRandomInteger(m: integer := 5; n: integer := 5; a: integer := 0; b: integer := 100): array [,] of integer;
/// Возвращает двумерный массив размера m x n, заполненный случайными вещественными значениями
function MatrRandomReal(m: integer := 5; n: integer := 5; a: real := 0; b: real := 10): array [,] of real;
function MatrRandomReal(m: integer := 5; n: integer := 5; a: real := 0; b: real := 10; digits: integer := 2): array [,] of real;
/// Возвращает двумерный массив размера m x n, заполненный элементами gen(i,j)
function MatrGen<T>(m, n: integer; gen: (integer,integer)->T): array [,] of T;
/// Возвращает двумерный массив размера m x n, заполненный элементами x
@ -11696,12 +11696,12 @@ begin
Result[i, j] := Random(a, b);
end;
function MatrRandomReal(m: integer; n: integer; a, b: real): array [,] of real;
function MatrRandomReal(m: integer; n: integer; a, b: real; digits: integer): array [,] of real;
begin
Result := new real[m, n];
for var i := 0 to Result.RowCount - 1 do
for var j := 0 to Result.ColCount - 1 do
Result[i, j] := Random() * (b - a) + a;
Result[i, j] := RandomReal(a,b,digits);
end;
function MatrFill<T>(m, n: integer; x: T): array [,] of T;

12
bin/Lib/PABCSystem.xml
View file

@ -1141,19 +1141,19 @@
<member name="M:TypedFileRead(PABCSystem.TypedFile)">
<summary>--</summary>
</member>
<member name="M:FilePos(@file)">
<member name="M:FilePos(PABCSystem.BinaryFile)">
<summary>--</summary>
</member>
<member name="M:FileSize(@file)">
<member name="M:FileSize(PABCSystem.BinaryFile)">
<summary>--</summary>
</member>
<member name="M:Seek(@file,System.Int64)">
<member name="M:Seek(PABCSystem.BinaryFile,System.Int64)">
<summary>--</summary>
</member>
<member name="M:BinaryFileInit(@file@)">
<member name="M:BinaryFileInit(PABCSystem.BinaryFile@)">
<summary>--</summary>
</member>
<member name="M:BinaryFileRead(@file@,System.Type)">
<member name="M:BinaryFileRead(PABCSystem.BinaryFile@,System.Type)">
<summary>--</summary>
</member>
<member name="M:PascalABCVersion">
@ -2403,7 +2403,7 @@
<member name="M:MatrRandomInteger(System.Int32,System.Int32,System.Int32,System.Int32)">
<summary>Возвращает двумерный массив размера m x n, заполненный случайными целыми значениями</summary>
</member>
<member name="M:MatrRandomReal(System.Int32,System.Int32,System.Double,System.Double)">
<member name="M:MatrRandomReal(System.Int32,System.Int32,System.Double,System.Double,System.Int32)">
<summary>Возвращает двумерный массив размера m x n, заполненный случайными вещественными значениями</summary>
</member>
<member name="M:MatrGen``1(System.Int32,System.Int32,System.Func{System.Int32,System.Int32,``0})">