1. Нахождение суммы элемента массива
2. Поиск максимального элемента массива
3. Поиск элемента, равного 50 (последнего в массиве, удовлетворяещего условие)
4. Поиск элемента, равного 50 (первого в массиве, удовлетворяещего условие)
5. Вывод количества элементов удовлетворяющих условие
6. Вывод суммы элементов удовлетворяющих условие

program babo4ka;

uses crt,graphABC;

begin

setwindowsize(600,600);

line(263,47,220,5);

line(300,47,340,5);

setbrushcolor(clblack);

circle(283,70,30);

setbrushcolor(clyellow);

circle(198,180,65);

circle(371,180,65);

circle(159,340,100);

circle(410,340,100);

setbrushcolor(clred);

ellipse(180,145,240,220);

ellipse(330,145,390,220);

setbrushcolor(clbrown);

ellipse(260,100,310,500);

setbrushcolor(clblue);

ellipse(90,270,140,333);

ellipse(430,270,480,333);

setbrushcolor(clgreen);

ellipse(155,320,205,385);

ellipse(363,320,413,385);

end.

Объяснение:

'''программа не содержит проверок на корректную вводимость значений'''

height = float(input("Ваш рост: "))

weight = float(input("Ваш вес: "))

age = float(input("Ваш возраст: "))

if age < 25:

   if height % 100 == weight - 5:

       print("Идеальный вес")

   elif weight - 5 > height % 100:

       print("Избыточный вес")

   else:

       print("Недостаточный вес")

elif 25 <= age <= 45:

   if height % 100 == weight:

       print("Идеальный вес")

   elif weight > height % 100:

       print("Избыточный вес")

   else:

       print("Недостаточный вес")

elif age > 45:

   if weight + 5 == height % 100:

       print("Идеальный вес")

   elif weight + 5 > height % 100:

       print("Избыточный вес")

   else:

       print("Недостаточный вес")