RosettaCodeData/Task/Create-a-two-dimensional-array-at-runtime/IS-BASIC/create-a-two-dimensional-array-at-runtime.basic

5 lines
144 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
100 INPUT PROMPT "Enter array dimensions separated by a coma: ":A,B
110 NUMERIC ARRAY(1 TO A,1 TO B)
120 LET ARRAY(1,1)=PI
130 PRINT ARRAY(1,1)