RosettaCodeData/Task/Create-a-two-dimensional-array-at-runtime/IS-BASIC/create-a-two-dimensional-array-at-runtime.basic
2023-07-01 13:44:08 -04:00

4 lines
144 B
Text

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)