На бейсике Даны массивы A (m) и B (m) , m

Dim A (12) , B (12) , C (12) Input «Введите размерность массивов А и В — m=", m Print «Введите элементы массивов А и В: "For i=1 to m Input A (i) , B (i) Next is=0For i=1 to m C (i)=A (i)+B (m-i+1) s=s+C (i) Next i Print «Массив А: " For i=1 to m Print A (i); Next i PrintPrint «Массив B: " For i=1 to m Print B (i); Next i PrintPrint «Массив C: " For i=1 to m Print C (i); Next i PrintPrint «Сумма элементов массива С="; s