(qbasic) матрица, нахождение суммы строк, замена столбца суммами

[qbasic_maniac]

В матрице А(6:8) найти суммы элементов каждой строки.
Заменить элементы 2-го столбца на соответствующие суммы.
Обе матрицы распечатать.

уже долго ломаю голову, но постоянно что-то не сходится
cls
dim A(6,8)
summ = 0
for i = 1 to 6
summ = summ + A(i,j)
for j = 1 to 8
a(i,j) = int(rnd*100)-20
next j
next i

пока что это лучшее, что у меня получилось :D
может кто-нибудь знает, что делать дальше?

[Qaliti]

cls

dim A(6, 8) S(6)

for i = 1 to 6
   for j = 1 to 8
      input "В ведите в" ;j; "-й стобец" ;i; "-ой строке матрице:", A(i, j)
   next j
next i

for i = 1 to 6
  sym = 0
   for j = 1 to 8
    sym = sym + A(i, j)  
   next j
  S(i) = sym
next i

for i = 1 to 6 
   print "Сумма" ;i; "-ой строки равна:" S(i)
next i

end

[Qaliti]

или для случайного заполнения матрици:

cls

dim A(6, 8) S(6)

for i = 1 to 6
   for j = 1 to 8
      A(i, j) = int(rnd(-99999999999999999999) * 99999999999999999999)
   next j
next i

for i = 1 to 6
  sym = 0
   for j = 1 to 8
    sym = sym + A(i, j)  
   next j
  S(i) = sym
next i

for i = 1 to 6 
   print "Сумма" ;i; "-ой строки равна:" S(i)
next i

end

[qbasic_maniac]

спасибо огромное
а как все таки заменить элементы 2-го столбца на полученные суммы и распечатать обе матрицы(исходную и полученную)?
(в случае случайного заполнения)

[Qaliti]

ой бля... забыл что нужно второй столбец заменить ))

cls

dim A(6, 8) S(6)

for i = 1 to 6
   for j = 1 to 8
      A(i, j) = int(rnd(-99999999999999999999) * 99999999999999999999)
   next j
next i

for i = 1 to 6
  sym = 0
   for j = 1 to 8
    sym = sym + A(i, j)  
   next j
  S(i) = sym
next i

for i = 1 to 6
   for j = 1 to 8
      print ;j; "-й стобец" ;i; "-ой строке матрице равен:", A(i, j)
   next j
next i

for i = 1 to 6 
   A(i, 2) = S(i)
   print "Сумма" ;i; "-ой строки равна:" A(i, 2)
next i

end

[qbasic_maniac]

супер спасибо, но это все равно немного не то

по сути, обе матрицы должны быть распечатаны в виде таблиц с элементами
1 2 3 4
2 3 4 5
3 4 5 6
4 5 6 7
типа того.
все равно огромное спасибо за помощь и уделенное время

[Qaliti]

то есть для замены второго столбца нужно создать такую же новую матрицу и заменить в ней второй столбец?

[qbasic_maniac]

именно
к примеру есть некая матрица 4х4
1 2 3 4
2 3 4 5
3 4 5 6
4 5 6 7
ее второй столбец нужно заменить на суммы элементов строк
1 10 3 4
2 14 4 5
3 18 5 6
4 22 6 7
как-то так
плюс ко всему эти матрицы нужно распечатать в их первоначальном виде, в виде таблиц с элементами

[Serge_Bliznykov]

плюс ко всему эти матрицы нужно распечатать в их первоначальном виде, в виде таблиц с элементами

обычно, в подобных задач не предполагается вторая матрица.
Поэтому перед обработкой выводится содержимое исходной матрицы.
Потом производится обработка прямо в исходной матрице.
После этого выводится содержимое этой же матрицы (но уже после внесённых изменений).

[qbasic_maniac]

я как раз это и имею в виду
наверное не так выразился =\