Хранилище информации слово из 10 букв

Жёский диск                         правильный ответ =

my_array = list()   # создаем список (массив)

# заполняем массив  

my_array = [1, 29, 36, 23, 49, 11, 10, 77, 1, 10, 43, 78, 35, 13, 94, 53, 81, 73, 91, 6, 68, 80, 40, 31, 60, 12, 54, 79, 2, 71]

p = 1   # переменная для произведения

for i in range(30):

    if ((my_array[i] % 6 ! = 0) and (10 < = my_array[i] < = 99)) :   # проверка неделимости элемента на 6 и двузначность

        p = p * my_array[i]   # если подходит, то находим произведение

   

print(p)                   # выводим на экран

{с клавиатуры вводится число a, до тех пор, пока не будет введен 0. начальное введенное a записывается в min   и  max, чтобы потом в цикле было с чем сравнивать} var min,max,a: real; begin     readln(a);     min: =a; max: =a;     while a< > 0 do         begin               readln(a);                   if a> max then                       max: =a;                   if a< min then                       min: =a;           end; writeln('min:   ',min,'   max:   ',max); end.