Задание на Листе 1 и Листе 2. легкие, но нужно сейчас

import random

li=[]

li1=[]

li2=[]

a=0

b=0

с=0

d=0

k1=0

k2=0

for i in range(15):

   f=random.randint(-30,25)

   if f<0:

       li1.append(f)

   elif f>=0:

       li2.append(f)

   li.append(f)

#print(li)

#print(li1)

#print(li2)

for k in li1:

   a+=k

   k1+=1

#c=a/k1

for n in li2:

   b+=n

   k2+=1

#d=b/k2

print(f"Сума відємних чисел: {a}")

print(f"Сума додатніх чисел: {b}")

#print(f"Середнє значення відємних чисел: {с}")

#print(f"Сeреднє значення додатніх чисел: {d}")

среднее число не знаю как сделать

Объяснение:

Если считать отрицательные трехзначные, то сумма таких чисел в диапазонах от -999 до -100 и от 100 до 999 будет равна 0. Для только положительных:

//c циклом for
var s,i:integer;
begin
  for i:=100 to 999 do
    if i mod 77 = 0 then s:=s+i;
  writeln('Сумма трехзначных кратных 77: ',s);
end.

Тестовое решение:
Сумма трехзначных кратных 77: 5929

// с циклом while
var s,i:integer;
begin
  i:=100;
  while i<=999 do begin
    if i mod 77 = 0 then s:=s+i;
    i:=i+1;
  end;
  writeln('Сумма трехзначных кратных 77: ',s);
end.