ответ:
n = int(
lstr = (" ")
ns = []
i = 0
tot = 0
while i < n:
ns.append(int(
tot += int(lstr[i])
i += 1
if tot % 5 == 0 and len(ns) > 4:
sm = int(tot / 5)
ns = sorted(ns, reverse=true)
ps = "yes"
su = 0
sk = 0
b = false
for n in ns:
if n ! = 0 and b:
su == 0
sk += 1
b = false
break
if sk == 5:
ps = "no"
break
su += n
if abs(su) > abs(sm):
ps = "no"
break
if su == sm:
b = true
print(ps)
else:
print("no")
объяснение:
program raf105;
var
s:string;
n,i:integer;
begin
writeln('Введите строку:');
readln(s);
writeln('Введите номер символа после которого не нужно заменять скобки:');
readln(n);
for i:=1 to n do
if (s[i] = '(') or (s[i] = ')')
then s[i]:= '|';
writeln('Отредактированный вариант строки:');
writeln(s);
end.
Язык PascalABC