код на C++:
#include <iostream>
using namespace std;
int main()
{
const short R = 3;
const short C = 3;
long long int A[R][C];
for (int i = 0; i < C; i++)
{
for (int j = 0; j < R; j++)
{
cin >> A[i][j];
};
};
short result = 0;
for (int i = 0; i < C; i++)
{
for (int j = 0; j < R; j++)
{
if (A[i][j] == 0)
{
result++;
};
};
};
cout << result << endl;
return 0;
}
Объяснение:
Я не понял, что значит A(3,3), но я посчитаю это двумерным массивом 3 на 3. Делаем вложенный цикл и там сравниваем массив с индексами i и j с 0, и если да, то увеличиваем result на 1, а если нет, то ничего
program raf105;
var k,a,p,b,m,let:real;
begin
write('Площадь участка (га.): ');
readln(k);
write('Средняя урожайность с гектара (ц.): ');
readln(a);
write('Увеличение участка за год (% от площади): ');
readln(p);
write('Рост урожайности за год (% от урожайности): ');
readln(b);
write('Желаемый урожай (ц.): ');
readln(m);
while a < m do
begin
k+= (k/100*p);
a+= (a/100*b);
let+= 1;
end;
writeln;
writeln('Желаемая урожайность (',m,' ц.) будет достигнута через ',let,' лет');
writeln('При этом, площадь участка будет составлять примерно ',round(k),' га.');
end.
Язык PascalABC
