Пример вывода двумерного массива в qbasic

code: #basic
DIM prompt AS STRING
....
prompt = ""
FOR i = 1 TO UBOUND(a,1)
  FOR j = 1 TO UBOUND(a,2)
   prompt = prompt & a(i, j) & " " 
  NEXT j
  prompt = prompt & Chr(13)
NEXT i
PRINT prompt

автор: БурундукЪ

Поделиться:

Похожие статьи: