Помощь - Поиск - Пользователи - Календарь
Полная версия: Сумма элементов массива
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Ада и другие языки
Гелла
У меня задача: дан чиловой массив X(4,3), нужно найти общую сумму первого и третьего столбцов.
Моя программа почему то не считает эти суммы, она только вводит маччив и заканчивает..ароде бы все правильно сделано.. unsure.gif где здесь может быть ошибка? unsure.gif



Код
CLS
DIM x(1 TO 4, 1 TO 3), i, j AS INTEGER, s1, s2, s3 AS SINGLE
FOR i = 1 TO 4
FOR j = 1 TO 3
PRINT "vv znach elta", i, ",", j, ")"
INPUT x(i, j)
NEXT j
NEXT i
FOR i = 1 TO 4
FOR j = 1 TO 3
PRINT x(i, j);
NEXT j
NEXT i
s1 = 0
FOR j = 1 TO 3
s1 = s1 + x(1, j)
NEXT j

s2 = 0
FOR j = 1 TO 3
s2 = s2 + x(3, j)
NEXT j
s3 = s1 + s2
PRINT 'obsch summa eltov 1go i 3go stolbtsa",s3
END



xds
В последнем PRINT вместо двойной кавычки стоит одинарная - интерпретатор думает, что это PRINT без параметров (переход на новую строку). Одинарная кавычка в QBasic - начало комментария.

В PRINT для разделения параметров лучше вместо запятой использовать точку с запятой, т. к. запятая вставляет символ TAB. При выводе чисел к ним по краям всегда дописываются пробелы. Побороться с этим можно так: LTRIM$(STR$(n))
Гелла
Ой...я такая невнимательная...Спасибо.. give_rose.gif
Гелла
У меня тут возник ещё один вопрос..
Цитата
x(i,j)-
это элемент
Цитата
i-го столбца и jтой строки
или наоборот??
xds
Это как договориться smile.gif Хотя, удобнее считать что первый индекс - номер строки, а второй - столбца (по аналогии с матрицами).
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.