zadach77.BAS

{* Задача77 *}

REM basic

' Составьте программу подсчета строк двухмерного массива А(N, M), в которых имеется хотя бы один нулевой элемент.


For i=1 To n
f=0
For j=1 To m
If a(i,j)=0 Then f=1
Next
If f=1 Then k=k+1
Next
End