Create a two-dimensional array at runtime: Difference between revisions
Create a two-dimensional array at runtime (view source)
Revision as of 18:00, 13 April 2024
, 1 month ago→{{header|S-BASIC}}: added comment
(Added various BASIC dialects (Chipmunk Basic, GW-BASIC, Minimal BASIC, MSX Basic and XBasic)) |
m (→{{header|S-BASIC}}: added comment) |
||
| (2 intermediate revisions by 2 users not shown) | |||
Line 2,907:
33
</pre>
=={{header|Prolog}}==
{{works with|SWI Prolog}}
<syntaxhighlight lang="prolog">:- dynamic array/2.
run :-
write('Enter two positive integers, separated by a comma: '),
read((I,J)),
assert(array(I,J)),
Value is I * J,
format('a(~w,~w) = ~w', [I, J, Value]),
retractall(array(_,_)).</syntaxhighlight>
=={{header|Python}}==
Line 3,179 ⟶ 3,191:
println!("{}", v[0][0]);
}</syntaxhighlight>
=={{header|S-BASIC}}==
<syntaxhighlight lang="BASIC">
var a, b = integer
print "Two-Dimensional Array Example"
input "Size of first dimension"; a
input "Size of second dimension"; b
dim integer test_array(a, b)
test_array(1,1) = 99 rem S-BASIC arrays are indexed from 1
print "Value stored at 1,1 ="; test_array(1,1)
end
</syntaxhighlight>
{{out}}
<pre>
Two-Dimensional Array Example
Size of first dimension? 7
Size of second dimension? 7
Value stored at 1,1 = 99
</pre>
=={{header|Scala}}==
| |||