a = int(input())
for i in range(a):
b = input()
c = 0
d = True
e = 0
f = False
g = False
h = '\''
for j in b:
if j == '#' and not f:
g = True
break
elif j != ' ':
if d:
print(' ' * c, end='')
elif c > 0:
print(' ', end='')
c = 0
print(j, end='')
if(j == '\"' or j == '\'') and e % 2 == 0:
if f and j == h:
f = False
else:
f = True
h = j
if f:
d = True
else:
d = False
if j == '\\':
e += 1
else:
e = 0
else:
c += 1
r = j == ' '
if g and c > 1:
print(' ', end='')
if i < a - 1:
print()
1
Объяснение:
Программа:
Pascal:
var
arr: array of integer;
N, i, j, pr, min, n1, k: integer;
begin
min := MAXINT; pr := 1;
write('N = '); readln(N);
setLength(arr, N);
for i := 0 to N - 1 do begin
arr[i] := random(-20, 30);
if abs(arr[i]) < min then min := abs(arr[i]);
if arr[i] mod 2 = 0 then inc(j);
end;
for i := 0 to N - 1 do
if arr[i] = 0 then begin
n1 := i; break;
end;
writeln(n1);
for i := n1 + 1 to N - 1 do begin
if arr[i] = 0 then inc(k);
if k = 0 then pr := pr * arr[i]
else if k = 1 then break;
end;
writeln('Массив: ', arr);
writeln('Минимальный элемент по модулю: ', min);
writeln('Количество чётных элементов: ', j);
if k = 0 then writeln('Не было сгенерировано нулей/сгенерирован 1 ноль')
else writeln('Произведение: ', pr);
end.
(x+1)²=0
x+1=0
x=-1