#include <iostream>
#include <vector>
#include <set>
#define ll long long
using namespace std;
signed main() {
ll n;
cin >> n;
vector<pair<ll,ll>> a(n);
vector<ll> pref(n,0),d(n,0),ans(n,0);
set<ll> s;
for(ll i = 0; i < n; i++){
cin >> a[i].first;
a[i].second = i;
s.insert(a[i].first);
if(i == 0)
pref[i] = a[i].first;
else
pref[i] = pref[i-1] + a[i].first;
d[i] = s.size();
}
if(d[n-1] > 1 || n == 1)
ans[a[n-1].second] = 1;
for(ll i = n - 2; i >= 0; i--){
if(pref[i] > a[i + 1].first && ans[a[i+1].second] == 1 && d[i] > 1)
ans[a[i].second] = 1;
}
for(ll i = 0; i < n; i++)
cout << ans[i] << " ";
}
P.S. Откуда задача, уж больно часто я ее встречаю на подобных сайтах
var
a: array [1..25] of integer;
i: integer;
min: integer;
otr: integer;
begin
{Формирование массива случайными числами в заданном диапазоне}
randomize;
for i:=1 to 25 do
a[i]:=random(201)-100;
min:=a[1];
otr:=1;
for i:=1 to 25 do
begin
if a[i]<min then min:=a[i];
if (a[i]<0) and (otr=1) then otr:=a[i];
end;
if otr=1 then
writeln('Отрицательных элементов не найдено')
else
writeln(otr+min)
end.