По бревну длиной 1 метр ползают две неутомимых улитки. Движутся они равномерно. Первая улитка в период с 12:00 до 00:00 проползает вправо 50 см, а в
период с 00:00 до 12:00 проползает влево 30 см. Вторая улитка в период с 00:00 до
12:00 проползает влево 5 см, а в период с 12:00 до 00:00 проползает вправо 30 см. В
понедельник, в 12-00, они начали бежать от левого края бревна. Какая улитка, первая
или вторая, доберётся до правого края бревна раньше? В какой день это произойдет
и в какое время? ответ обоснуйте.

def solve(x, op, y):

   if str(op) == '+':

       try:

           print(float(x) + float(y))

       except ValueError:

           print('одно из значений не число')

   elif str(op) == '-':

       try:

           print(float(x) - float(y))

       except ValueError:

           print('одно из значений не число')

   elif str(op) == '*':

       try:

           print(float(x) * float(y))

       except ValueError:

           print('одно из значений не число')

   elif str(op) == '/':

       try:

           print(float(x) / float(y))

       except ZeroDivisionError:

           print('на ноль делить нельзя')

       except ValueError:

           print('одно из значений не число')

       return 0

   elif str(op) == '//':

       try:

           print(float(x) // float(y))

       except ZeroDivisionError:

           print('на ноль делить нельзя')

       except ValueError:

           print('одно из значений не число')

       return 0

   elif str(op) == '^':

       try:

           print(float(x) ** float(y))

       except ValueError:

           print('одно из значений не число')

   else:

       print('error')

   return 0

while True:

   num1, op, num2 = input().split()

   solve(num1, op, num2)

Объяснение:

Данные вводятся через пробел, ex:

Ввод: 2 + 2

Вывод: 4

Var
max,min,i,x:integer;
m:array[10..20] of integer;
begin
min:=10;
max:=10;
randomize;
for i:=10 to 20 do m[i]:=random(10)+10;
for i:=10 to 20 do write(m[i],' ');
writeln;
for i:=10 to 20 do
begin
if ( m[i] mod 2) = 0 then m[i]:=m[i]+1;end;
for i:=10 to 20 do write(m[i],' ');
writeln;
end.
2)

var
max,min,i,x:integer;
m:array[10..20] of integer;
begin
min:=10;
max:=10;
randomize;
for i:=10 to 20 do m[i]:=random(10)+10;
for i:=10 to 20 do write(m[i],' ');
writeln;
for i:=10 to 20 do
begin
if ( m[i] mod 2) = 0 then m[i]:=0 else m[i]:=m[i]*3;
end;
for i:=10 to 20 do write(m[i],' ');
writeln;
end.