Нужны ответы к сборнику по !

денис ушаков: огэ фипи 2020. информатика. 10 вариантов. типовые варианты экзаменационных

ЕСЛИ НЕ РАБОТАЕТ КОД, СМОТРИ ФОТО

a = [1, 2, 3, -4, 5, 6, 7, 8, 9, 10]

b = [1, 2, -3, 4, 5, 6, 7]

#суммы

sumb = 0

suma = 0

for i in range(len(a)):

   if i % 2 != 0:

       suma += a[i]

print('suma a:', suma)

for i in range(len(b)):

   if i % 2 != 0:

       sumb += b[i]

print('suma b:', sumb)

print('suma a+b', suma+sumb)

# произведения

pra = 0

prb = 0

for i in range(len(a)):

   if a[i] < 0:

       if pra != 0:

           pra = pra * a[i]

       else:

           pra = a[i]

print('произведение а:', pra)

for i in range(len(b)):

   if b[i] < 0:

       if prb != 0:

           prb = prb * b[i]

       else:

           prb = b[i]

print('произведение b:', prb)

print('общее произведение:', pra*prb)

Program zadacha;varA: array[1..8] of integer;i,kolvo_pol,proiz_otr: integer;beginfor i:=1 to 8 do read(A[i]);kolvo_pol:=0;proiz_otr:=1;
for i:=1 to 8 do beginif A[i]>0 then kolvo_pol:=kolvo_pol+1;end;writeln();writeln('kolvo_pol = ', kolvo_pol);
for i:=1 to 8 do beginif A[i]<0 then proiz_otr:=proiz_otr*A[i];end;writeln('proiz_otr= ', proiz_otr);end.

program zadacha;varC: array[1..10] of integer;i: integer;beginfor i:=1 to 10 do read(C[i]);writeln();
for i:=1 to 10 do beginif C[i]>0 then C[i]:=sqr(C[i]);end;
for i:=1 to 10 do beginif C[i]<0 then C[i]:=20;end;
for i:=1 to 10 do write(C[i]:6);end.