Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Ада и другие языки _ Сумма элементов массива

Автор: Гелла 11.05.2007 15:35

У меня задача: дан чиловой массив 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 11.05.2007 16:18

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

В PRINT для разделения параметров лучше вместо запятой использовать точку с запятой, т. к. запятая вставляет символ TAB. При выводе чисел к ним по краям всегда дописываются пробелы. Побороться с этим можно так: LTRIM$(STR$(n))

Автор: Гелла 11.05.2007 17:27

Ой...я такая невнимательная...Спасибо.. give_rose.gif

Автор: Гелла 11.05.2007 17:59

У меня тут возник ещё один вопрос..

Цитата
x(i,j)-
это элемент
Цитата
i-го столбца и jтой строки
или наоборот??

Автор: xds 11.05.2007 21:23

Это как договориться smile.gif Хотя, удобнее считать что первый индекс - номер строки, а второй - столбца (по аналогии с матрицами).