В квадратной матрице найти количество элементов равных "0"
В квадратной матрице найти количество элементов равных "0"
Ответ(ы) на вопрос:
Гость
Исходный код программы приложен
Гость
var
a: array [1..N,1..N] of real;
i: integer;
j: integer;
kol: integer;
begin
// ввести значения массива a вашим любимым способом
for i:=1 to N do
for j:=1 to N do
if a[i,j]=0 then
kol=kol+1;
write('Количество нулей = ', kol);
end.
Не нашли ответ?
Похожие вопросы