Задан двухмерный массив. Определить, сколько раз встречается число 1 среди элементов третьей строки матрицы.

Задан двухмерный массив. Определить, сколько раз встречается число 1 среди элементов третьей строки матрицы.
Гость
Ответ(ы) на вопрос:
Гость
program project1; uses crt,math; const n=3; var  s:real;   i,j,f:byte;  a:array [1..n, 1..n] of integer; begin   for i:=1 to n do  begin   for j:=1 to n do   begin   write('vvedite ',i,'.',j,' cifru ');readln(a[i,j]);    end;   end;   for i:=1 to n do  begin   for j:=1 to n do   begin   if (a[i,3]=1) then  inc(f);  end;   end;  writeln('1 vstrechaetsya: ',f:2,' raz');  readln; end.    
Не нашли ответ?
Ответить на вопрос
Похожие вопросы