Нужна помощь с Матрицай М на Н - Форум «Всё о Паскале»

Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи

Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

Нужна помощь с Матрицай М на Н, сумма элементов

Опции

ovosch

24.05.2011 0:54

Сообщение #1

Группа: Пользователи
Сообщений: 4
Пол: Мужской
Реальное имя: ovosch

Репутация:

Доброй ночи.
Не получается решить задачу . Помогите пожалуйсто

Дана вещественная матрица размерности n×m. Найти общую сумму элементов только тех столбцов, которые имеют хотя бы один нулевой элемент.

program ovosch;
var A:array [1..100,1..100] of integer;

i,j,m,n:integer;
sum: real;
begin

readln(n);
readln(m);
for i:=1 to n do begin
for j:=1 to m do begin
 a[i,j]:=random(51);
      write(a[i,j]:4);
      end;
      writeln
      
      end;
      if j=0 then ??????
      end.