Много ! решить , по программированию (pascal abc)сборник златопольского 1.44 даны стороны прямоугольника, найти его периметр и длину диагонали

Var a,b,p,d: integer; begin writeln('введите стороны прямоугтльника'); readln(a,b); p: =(a+b)*2; d: =sqrt(sqr(a)+sqr(b)); writeln('периметр ',p,' диоганаль ' ,d); end.

узнаем информационный вес символа по формуле:

, где i - информационный вес символа, n - мощность алфавита (количество символов в алфавите).

, значит i = 5 бит.

информационный объём находится по формуле:

i = k × i, где i - информационный вес сообщения, k = количество символов в сообщении, i - информационный вес символа.

узнаем количество символов в сообщении:

k = 8 × 16 × 256 = 32768 символов.

узнаем информационный объём сообщения:

i = 32768 × 5 бит = 163840 бит = 20480 байт.

Python 3.7.2

some_list = [int(input()) for i in range(int(input('list range: ')))]

EvenSumm = 0 #Сумма чётных

#Ищем сумму чётных

EvenSumm = sum(list(filter(lambda x: x % 2 == 0, some_list)))

#Среднее арифметическое закачивающихся на 5

endswithfive = list(filter(lambda x: x % 10 == 5, some_list))

endswithfive_average = sum(endswithfive) / len(endswithfive)

#Поиск чего то, равного х  

something_equal_x = some_list[some_list.index(int(input('x = ')))]

#Маскимум и его индекс

max_ind = some_list.index(max(some_list))

max_and_his_index = (max(some_list), max_ind)

print(f'''

Answers:

a) Even Summ: {EvenSumm}

b) Average of nums, ends with '5': {endswithfive_average}

c) something, equal x: {something_equal_x}, placed under index: {some_list.index(something_equal_x)}

d) maximum and his index: {max_and_his_index}

   ''')

P.S - Скопированый код может не работать. Это нормально, сайт портит отступы. Код протестирован, работает. Приложен скриншот программы и вывода для придуманных на ходу входных данных