Двумерный Массив, Последние столбцы массива |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Двумерный Массив, Последние столбцы массива |
forMator |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 49 Пол: Мужской Репутация: 0 |
Не получается найти последние f столбцы и вычислить их среднее арифметическое. Размерность матрицы k на l.
Запутался в циклах!Последние f столбцы нашёл,а при вычислении среднего арифметического выдаётся неправильный ответ. |
forMator |
Сообщение
#2
|
Новичок Группа: Пользователи Сообщений: 49 Пол: Мужской Репутация: 0 |
Пытаюсь решить задачу!Опять же с двумерном массивом!!
Дана квадратная матрица разм. n на n. Вычислить сумму элементов тех столбцов первый элемент которых равен 1! Нужен ли здесь одномерный массив для вывода этих сумм? Или же можно обойтись и без него!! И как можно посчитать сумму столбцов где 1, описывая через string что ли??? Я делаю через string, а TP мне сразу выдаёт ошибку!! Подскажите пожалуйста как найти эту сумму!!!!! Код Program lo; Const n=5; Var a:array[1..n,1..n] of integer; b:array[1..n] of integer; i,s:integer;j:string; begin writeln('vvod matrici'); for i:=1 to n do begin for j:=1 to n read(a[i,j]); readln; end; if j='1' then begin for i:=1 to n do begin s:=0; for i:=1 to n do begin s:=s+a[i,j]; end; b[j]:=s; end; end; |
Текстовая версия | 20.04.2024 2:34 |