Помощь - Поиск - Пользователи - Календарь
Полная версия: Двумерный массив
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Beseech
31.05.2007 1:03
В двумерном массиве найти количество столбцов, не содержащих нулей.
мисс_граффити
31.05.2007 1:40
Решалось, пользуйся поиском.
BaHeKуC
5.03.2011 0:41
Цитата(мисс_граффити @ 30.05.2007 21:40) *

Решалось, пользуйся поиском.

Ничего здесь не решалось подобного
volvo
5.03.2011 0:49
Решалось. Если кто-то не умеет пользоваться поиском - это сугубо его проблемы. Учись.
Lapp
5.03.2011 9:40
Цитата(Beseech @ 30.05.2007 21:03) *
В двумерном массиве найти количество столбцов, не содержащих нулей.

Попробуй вот так:

var
  a: array [1..m,1..n]of integer;

{...}

  k:=0;
  for j:=1 to n do begin
    i:=1;
    while (i<=m) and (a[i,j]<>0) do Inc(i);
    if i>n then Inc(k)
  end;
  writeln('кол-во столбцов без нулей равно ',k);
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.