Нужно на python.Можно сделать хотя бы 5 из всех.

cnt = 0 # количество чисел в последовательности

mean = 0 # среднее значение последовательности

mod3 = 0 # количество чисел, делящихся на 3

mod3_7 = 0 # количество чисел, делящихся на 3, но не делящихся на 7

cnt2 = 0 # количество двузначных чисел

cnt2_3 = 0 # количество двузначных чисел, оканчивающихся на 3

maxx = None # максимальное число

maxx_mod2 = None # максимальное из чётных

maxx2 = None # второй максимум

maxmin = None # разница между максимальным и минимальным

a = int(input('Введите целое число: '))

while a != 0:

   cnt += 1

   mean += a

   if abs(a)%3 == 0: mod3 += 1

   if abs(a)%3 == 0 and abs(a)%7 != 0: mod3_7 += 1

   if abs(a)//10 != 0 and abs(a)//100 == 0: cnt2 += 1

   if abs(a)//10 != 0 and abs(a)//100 == 0 and abs(a)%10 == 3: cnt2_3 += 1

   if maxx is None or a > maxx: maxx = a

   if abs(a)%2 == 0 and (maxx_mod2 is None or a > maxx_mod2): maxx_mod2 = a

   if a < maxx and (maxx2 is None or maxx2 < a): maxx2 = a

   if maxmin is None or a < maxmin: maxmin = a

   a = int(input('Введите ещё одно целое число или 0 для завершения: '))

print()

print('- количество чисел в последовательности:', cnt)

if cnt != 0:

   print('- среднее значение последовательности:', round(mean/cnt,2))

   print('- количество чисел, делящихся на 3:', mod3)

   print('- количество чисел, делящихся на 3, но не делящихся на 7:', mod3_7)

   print('- количество двузначных чисел:', cnt2)

   print('- количество двузначных чисел, оканчивающихся на 3:', cnt2_3)

   print('- максимальное число:', maxx)

   print('- максимальное из чётных:', maxx_mod2)

   print('- второй максимум:', maxx2)

   print('- разница между максимальным и минимальным:', maxx - maxmin)

То же самое, но с массивом и лямбда-функциями:

values = []

a = int(input('Введите целое число: '))

while a != 0:

   values.append(a)

   a = int(input('Введите ещё одно целое число или 0 для завершения: '))

print()

print('- количество чисел в последовательности:', len(values))

if len(values) != 0:

   print('- среднее значение последовательности:', round(sum(values)/len(values), 2))

   print('- количество чисел, делящихся на 3:', len(list(filter(lambda x: abs(x)%3 == 0, values

   print('- количество чисел, делящихся на 3, но не делящихся на 7:', len(list(filter(lambda x: abs(x)%3 == 0 and abs(x)%7 != 0, values

   print('- количество двузначных чисел:', len(list(filter(lambda x: abs(x)//100 == 0 and abs(x)//10 != 0, values

   print('- количество двузначных чисел, оканчивающихся на 3:', len(list(filter(lambda x: abs(x)//100 == 0 and abs(x)//10 != 0 and abs(x)%10 == 3, values

   print('- максимальное число:', max(values))

   print('- максимальное из чётных:', max(list(filter(lambda x: abs(x)%2 == 0, values

   print('- второй максимум:', max(list(filter(lambda x: x<max(values), values

   print('- разница между максимальным и минимальным:', max(values) - min(values))