Create a two-dimensional array at runtime: Difference between revisions
Create a two-dimensional array at runtime (view source)
Revision as of 16:37, 22 June 2024
, 5 days agoPascalABC.NET
m (→{{header|S-BASIC}}: added comment) |
(PascalABC.NET) |
||
Line 2,607:
dispose(data);
end.</syntaxhighlight>
=={{header|PascalABC.NET}}==
<syntaxhighlight lang="delphi">
begin
var (m,n) := ReadInteger2;
var a: array[,] of integer := new integer[m,n];
a[0,0] := 1; a[m-1,n-1] := 55;
a.Println;
var a1 := MatrRandomInteger(m,n);
a1.Println;
end.
</syntaxhighlight>
{{out}}
<pre>
3 4
1 0 0 0
0 0 0 0
0 0 0 55
76 53 12 48
79 22 15 43
40 97 26 64
</pre>
=={{header|Perl}}==
| |||