Структуры данных - двумерный массив (матрица) - 18 стр.

UptoLike

20
Тогда удаление строк, содержащих нулевые элементы (один или больше)
можно свести к удалению элемента в одномерном массиве.
Опишем алгоритм в виде процедуры
Delet_0.
procedure Delet_0(var n:integer;m:integer;
var a:matr);
var i,k:integer;
begin
k:=0;
for i:=1 to n do
if Not_Null_El(a[i],m) then
begin
k:=k+1; a[k]:=a[i]
end;
n:=k
end;
Упражнение 13. Опишите функцию Not_Null_El и проверьте
работу процедуры Delet_0.