Program for adding Two Array and shifting in Third in QBASIC

CLS
PRINT "Adding Value of first and Second Array"
PRINT "Enter value in First Array"
FOR i = 1 TO 10
    INPUT n(i)
NEXT i
PRINT "Enter value in Second Array"
FOR i = 1 TO 10
    INPUT m(i)
NEXT i
FOR i = 1 TO 10
    p(i) = m(i) + n(i)
NEXT i
PRINT "Sum of First and Second Array after adding in Third Array"
FOR i = 1 TO 10
    PRINT p(i)
NEXT i
END