Разабрать алгаритом реалезации игры 40 ​

var                                      
i,z,y,x: integer;                 // объявление переменных
begin                              // начало программы
writeln('Введите числа: '); // Вывод сообщения
readln(x,y);                      // Ввод чисел х и у с клавиатуры
while i <> y do                 // Повторять цикл пока i не будет равно y
 begin                             // Вход в цикл
 z:=z+x;                          // z = z + x  (при первом шаге получается 0 = 0 + х) 
 i:=i+1;                            // Увеличиваем счетчик цикла на 1 
 end;                               // Выход из цикла
write(z);                           // Вывод z (произведение х и у)
end.                                // Конец программы 

x1 = int(input("Введите количество элементов в первом списке "))

#создаем пустые списки

m1 = []

m2 = []

m3 = []

for i in range(x1):

   m1.append(int(input()))

s1,s2,s3= 0,0,0 #переменные для сумм

for i in range(x1): #находим сумму элементов первого массива

   s1+= m1[i]

print("Сумма элементов первого списка равна:",s1)

print("Среднее арифметическое первого списка равно",s1/x1)

x2 = int(input("Введите количество элементов во втором списке "))

for j in range(x2):

   m2.append(int(input()))

for j in range(x2): #находим сумму элементов первого массива

   s2 += m2[j]

print("Сумма элементов второго списка равна:",s2)

print("Среднее арифметическое второго списка равно",s2/x2)

x3 = int(input("Введите количество элементов в третьем списке "))

for k in range(x3):

   m3.append(int(input()))

for k in range(x3): #находим сумму элементов первого массива

   s3 += m3[k]

print("Сумма элементов третьего списка равна:",s3)

print("Среднее арифметическое первого списка равно",s3/x3)