Написать программы и нарисовать блок-схемы. Ко второй задаче нужна только блок-схема!

1. Последовательно вводятся числа, найти их произведение. Ввод остановить после ввода значения, которое больше 50.

2. Ввести сумму денег N, помещенную в банк под процент K на 5 лет. Определить сумму по вкладу в конце каждого года.

1) и 2):

a = [1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89]

b = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13]

c = []

for i in range(len(a)):

   for j in range(len(b)):

       if a[i] == b[j]:

           c.append(a[i])

print(list(set(sorted(c  # сортировка по возрастанию

print(list(set(sorted(c, reverse=True  # сортировка по убыванию

3):

a = [1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89]

for elem in a:

   if elem < 5:

       print(elem,end = ' ')

4)

a = []

for i in range(102):

   if i == 100:

       a.append(1)

   elif i == 101:

       a.append(1)

   else:

       a.append(0)

print(a)

5)

a = []  

for i in range(90):

   if i % 2 == 0:

       a.append(i)

print(a)

print(len(a))

PascalABC.NETbegin ArrRandom(ReadInteger('k:'),-99,99).Println.Slice(1,2).Average.Print end.

Объяснение:

ArrRandom(n,a,b) -- Возвращает массив размера n, заполненный случайными целыми значениями в диапазоне [a,b].Println -- Выводит последовательность на экран, используя пробел качестве разделителя, и переходит на новую строку.Slice(from,step) -- Возвращает срез последовательности от номера from с шагом step.Average -- Возвращает среднее значение последовательности.Print -- Выводит последовательность на экран, используя пробел качестве разделителя.

Пример работы:

37+55 = 9292 / 2 = 46