N=int(input())
a=[]
sum = 0
f = 0
c = 0
for i in range(N):
l = int(input())
sum = sum + l
a.append(l)
if N == 1:
print(1)
else:
ans = []
for i in range(N-1, 0, -1):
if a[i] > a[i-1]:
if sum > a[-1] or (sum > a[i+1] and f == 1):
for k in range(c+1):
ans.append(1)
c = 0
f = 1
else:
ans.append(0)
f = 0
elif a[i] == a[i-1]:
c += 1
else:
ans.append(0)
f = 0
sum=sum-a[i]
ans = ans[::-1]
print(0)
for i in range(c):
print(0)
for i in ans:
print(i)
Объяснение:
с тебя 500 рублей у меня сегодня др
program chisla;
var summa,n,y,i:longint;
begin
writeln('daite N'); readln(n);
for i:=1 to n do summa:=summa+i;
{etot tikl dayot summu dlya nomera N, primer: n=5, summa=1+2+3+4+5=15;}
y:=(n+1)/2;
if y>summa then writeln('Y > summa N ') else
if y=summa then writeln('Y = summa N') else writeln('Y < summa');
readln;
end.
ya tak ponyal zadachu, esli ne tak, proshu popraviti. spasibo