У меня получилось 6, но если ответ другой должен получиться, то надеюсь разберешься там с прогой и исправишь
Объяснение:
var x,y,n,b,c,q:integer;
f:array [-1..1000] of integer;
begin
for var i:=1 to 1000 do begin
if i<=15 then
f[i]:=2*i*i+4*i+3;
if (i>15) then
if (i mod 3=0) then
f[i]:= f[n-1]+i*i+3
else
F[i]:= f[i-2]+i-6;
end;
x:=f[i];
while x>0 do begin
b:=x mod 10;
x:=x div 10;
if b mod 2=0 then begin
q+=1; break;
if q=0 then
c+=1;
writeln (F);
writeln (c);
end.
#include <iostream>
#include <vector>
using namespace std;
void solve(){
int m,n;
cin >> m >> n;
vector<vector<int>> a(m,vector<int>(n));
vector<bool> b(m, true);
for(int i = 0; i < m; i++)
for(int j = 0; j < n; j++)
cin >> a[i][j];
for(int j = 1; j < n; j++)
if(a[i][j] <= a[i][j-1])
b[i] = false;
for(auto i : b) cout << i << " ";
}
signed main(){
solve();
У меня получилось 6, но если ответ другой должен получиться, то надеюсь разберешься там с прогой и исправишь
Объяснение:
var x,y,n,b,c,q:integer;
f:array [-1..1000] of integer;
begin
for var i:=1 to 1000 do begin
if i<=15 then
f[i]:=2*i*i+4*i+3;
if (i>15) then
if (i mod 3=0) then
f[i]:= f[n-1]+i*i+3
else
F[i]:= f[i-2]+i-6;
end;
for var i:=1 to 1000 do begin
x:=f[i];
while x>0 do begin
b:=x mod 10;
x:=x div 10;
if b mod 2=0 then begin
q+=1; break;
end;
end;
if q=0 then
c+=1;
end;
writeln (F);
writeln (c);
end.
#include <iostream>
#include <vector>
using namespace std;
void solve(){
int m,n;
cin >> m >> n;
vector<vector<int>> a(m,vector<int>(n));
vector<bool> b(m, true);
for(int i = 0; i < m; i++)
for(int j = 0; j < n; j++)
cin >> a[i][j];
for(int i = 0; i < m; i++)
for(int j = 1; j < n; j++)
if(a[i][j] <= a[i][j-1])
b[i] = false;
for(auto i : b) cout << i << " ";
}
signed main(){
solve();
}