Написать программу для паскаль абц, но при не слишком сложных операций. "пусть n - натуральное число и пусть означает 1*3*5**n для нечетного n и 2*4**n для четного n. вычислить " - факториал. т.ею нужно ввести натурально число(например 5), а программа должна посчитать произведение нечетных чисел(1*3*5=15)

//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
var n,i: integer;
p:BigInteger;
begin
  p:=1;
  write('Введите N ');readln(n);
  if n mod 2<>0 then i:=1 else i:=2;
      while i<=n do begin
        p:=P*i;
        i:=i+2;
      end;
    writeln(p);
end.

Тест №1
Введите N 6
48

Тест №2
Введите N 5
15

Если шестеренка с буквами двигается против часовой, а стрелка стоит на месте то буквы будут перечисляться по порядку, от А до Я.
Так как главная шестеренка вращает остальные, то вторая будет двигаться по часовой, это значит что начиная с нуля цифры на второй шестеренке будут уменьшаться, 0, 9, 8...1 и по кругу.
Далее третья шестеренка будет двигаться против часовой значит цифры будут идти по нарастающей, от 0 до 6. Составим таблицу
Таблица в картинках
О Л И М П И А Д А = 51 85 12 76 42 12 00 64 00

int1 = int(input())

int2 = int(input())

col1 = int(input())

col2 = int(input())

min1 = col1 + int1 * (col1 - 1 ) # Минимальное время которое она находились на платформе, согласно условиям 1 стороны платформы

max2 = col1 + int1 * (col1 + 1 ) # Максимальное время которое она находились на платформе, согласно условиям 1 стороны платформы

min1 = col2 + int2 * (col2 - 1 ) # Минимальное время которое она находились на платформе, согласно условиям 2 стороны платформы

max2 = col2 + int2 * (col2 + 1 ) # Максимальное время которое она находились на платформе, согласно условиям 2 стороны платформы

if min1 > min2 : # Находим общий минимум для обеих сторон плафтормы. Это максимальное из двух значений

totalmin = min1

else :

totalmin = min2

if max1 > max2 : # Находим общий максимум для обеих сторон плафтормы. Это минимальное из двух значений

totalmax = max2

else : # Важно помнить Минимум максимален и постепенно уменьшается. Максимум минимален и постепенно растет

totalmax = max1

if totalmin > totalmax : # Если Минимальное время больше чем максимальное, то , ошибка в подсчете, во всех других случаях интервал существует

print(-1)

else :

print(totalmin , totalmax)

# это пояснение кода, не участвующее в программе