#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();
}
var n,i:integer;
a:array[1..20] of integer;
begin
n:=20;
for i:=1 to n do
begin
a[i]:=random()%202+1;
if a[i] mod 10 = 0 then writeln(a[i]);
end;
readln;
end.
ну как то так.. нету возможности проверить.