Question

Составить программу вычисления произведения P=sin 1 • sin 2 • sin 3•...•sin n

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write('P=',SeqGen(ReadInteger,x->sin(x),1).Aggregate(Real(1),(a,b)->a*b));
end.

Answer 2

Я могу помочь вам составить программу вычисления произведения P = sin 1 • sin 2 • sin 3 • ... • sin n. Вот один из возможных вариантов решения этой задачи на языке Python:

# импортируем модуль math для использования функции sin
import math

# определяем функцию, которая принимает параметр n и возвращает произведение P
def product_of_sines(n):
  # инициализируем переменную P значением 1
  P = 1
  # используем цикл for для перебора всех целых чисел от 1 до n включительно
  for i in range(1, n + 1):
    # вычисляем синус i в радианах и умножаем его на текущее значение P
    P = P * math.sin(i)
  # возвращаем итоговое значение P
  return P

# пример использования функции
# вводим значение n с клавиатуры
n = int(input("Введите n: "))
# вызываем функцию и выводим результат на экран
print("P =", product_of_sines(n))

Надеюсь, это поможет вам решить вашу задачу.