Create a two-dimensional array at runtime: Difference between revisions
Create a two-dimensional array at runtime (view source)
Revision as of 17:21, 24 September 2015
, 8 years agoalphabetic order in list
(Applesoft BASIC) |
m (alphabetic order in list) |
||
Line 70:
⎕ex 'array' ⍝ erase the array
</lang>▼
=={{header|Applesoft BASIC}}==▼
10 INPUT "ENTER TWO INTEGERS:"; X%, Y%▼
20 DIM A%(X% - 1, Y% - 1)▼
30 X% = RND(1) * X%▼
40 Y% = RND(1) * Y%▼
50 A%(X%, Y%) = -32767▼
60 PRINT A%(X%, Y%)▼
</lang>
Line 111 ⟶ 100:
set array to {}
</lang>
▲=={{header|Applesoft BASIC}}==
▲<lang ApplesoftBasic>10 INPUT "ENTER TWO INTEGERS:"; X%, Y%
▲20 DIM A%(X% - 1, Y% - 1)
▲30 X% = RND(1) * X%
▲40 Y% = RND(1) * Y%
▲50 A%(X%, Y%) = -32767
▲60 PRINT A%(X%, Y%)
▲70 CLEAR</lang>
=={{header|AutoHotkey}}==
| |||