Посчитать сумму элементов 1, 3, 5 строк матрицы и вывести на экран - QBasic

Формулировка задачи:

Создать двумерный массив A(5,5), посчитать сумму элементов 1,3,5 строк и вывести на экран.Помогите плиз написать задачу в qbasic.

Решение задачи: «Посчитать сумму элементов 1, 3, 5 строк матрицы и вывести на экран»

Листинг программы

s1 = 0
s3 = 0
s5 = 0
FOR i = 1 TO n
FOR j = 1 TO m
IF i = 1 THEN s1 = s1 + a(i, j)
IF i = 3 THEN s3 = s3 + a(i, j)
IF i = 5 THEN s5 = s5 + a(i, j)
NEXT j
NEXT i
summa = s1 + s2 + s3
PRINT "s1= "; s1, "s3= "; s3, "s5= "; s5
PRINT "summa= "; summa

Объяснение кода листинга программы

Создаются три переменные s1, s3, s5, которые будут использоваться для хранения суммы элементов матрицы. Изначально все они равны 0.
Запускается двойной цикл FOR, который проходит по всем элементам матрицы.
Внутри двойного цикла проверяется, является ли значение переменной i равным 1, 3 или 5.
Если условие выполняется, то к соответствующей переменной s1, s3, s5 прибавляется значение элемента матрицы a(i, j).
После завершения двойного цикла, значение переменной summa вычисляется как сумма s1, s3, s5.
С помощью команды PRINT выводятся на экран значения переменных s1, s3, s5, summa.