Для нахождения произведения элементов, находящихся на главной диагонали двумерного массива размером 10x10, можно воспользоваться следующим кодом на Basic:

10 DIM A(10,10)
20 FOR I = 1 TO 10
30 FOR J = 1 TO 10
40 INPUT "Enter element at position (";I;",";J;") : ", A(I,J)
50 NEXT J
60 NEXT I
70 PRODUCT = 1
80 FOR I = 1 TO 10
90 PRODUCT = PRODUCT * A(I,I)
100 NEXT I
110 PRINT "The product of elements on the main diagonal is: "; PRODUCT

Этот код позволяет пользователю ввести элементы двумерного массива размером 10х10 и затем вычислить произведение элементов, находящихся на главной диагонали. Результат будет выведен на экран.