10 DEFINT N,I:INPUT "Введите N";N 20 DIM A(N) 'Массив А описан! 30 FOR I=0 TO N:INPUT A(I):NEXT I 40 'Данный фрагмент позволяет осуществить ввод элементов одномерного массива А (в массиве N+1 элемент!)