FK
Farid Kurbanov
Кто разбирается в программировании
Дана целочисленная прямоугольная матрица. Определить кол-во столбцов, не содержащих ни одного нулевого элемента.
В паскале
Дана целочисленная прямоугольная матрица. Определить кол-во столбцов, не содержащих ни одного нулевого элемента.
В паскале
Вложенный цикл не можешь написать?
Если n - строка, а m - столбец, cn - кол. эл. , fl - флаг столбец без нуля
и дан массив mas[n,m]
cn:=0;
for j := 1 to m do
fl:=True;
begin
for i := 1 to n do
begin
if mas[i,j] = 0 then begin fl:=False; Break; end;
end;
if fl then Inc(cn);
end;
WriteLn(cn);